[Bild] auf 236x236 bringen

G

gRaf-eny

Hallo,
ich habe ein Adressbuch geschreiben,
mit Bild funktion -> also wenn es zu dem eintrag Schneider, Helge das bild
Schneider, Helge.jpg gibt, dann wird dieses geladen!
Wenn nicht, dann nicht ...

So nun das Problem -> wenn das Bild jetzt 340 x 800 groß ist
dann wird in der picturebox nur der linke obere rand angezeigt -> also
nur die oben linken 236x236 pixel
-> wie kann ich das bild verkleiner anzeigen lassen ?

2)
Wie schwer ist es, das prog so zu verbessern, dass ich ein bild auswählen kann (irgendwo auf der platte - mit common dialog oder so)
und das wird dann im adressbuch ordner im format 236x236 als jpg gespeichert ?
 
also ihr ist mein momentaner source für das 2te
---
Private Sub but_addpic_Click()
CD1.ShowOpen
Bild.Picture = LoadPicture(CD1.FileName)


If Err.Number = 0 Then
SavePicture Bild.Picture, ("Bilder/" + TDaten(MOMENTANENTRYNUMMBER, 1) + ".jpg")
End If

End Sub
----
also er kopiert jetzt quasi das bild in den myadressbook/bilder ordner

nur halt in der flaschen auflösung
 
Nimm statt des Picture Steuerelement ein Image Steuerelement und setze die Stretch Eigenschaft auf True.
 
ah danke!

hab jetzt leider ein neues problem:

wenn ich jetzt nämlich das bild c:/bild.jpg öffne
will er es c:/Bilder/vorname_nachname.jpg speichern, das gibts aber nicht
es müsste programmordner/bilder/vorname_nachname.jpg sein

wenn ich sagen würde c:/mybook/bilder/vorname_nachname.jpg
gehts zwar, aber dann muss das prog ja immer auf c:/mybook liegen
das is auch blöd

also wie kann ich ihm sagen im programmordner ? da wo die exe ist ?

*edit habs schon
App.Path + "\Bilder\" + blabla.jpg
 
Zuletzt bearbeitet von einem Moderator:
da ich den commoin dialog in meinem projekt habe, geht das prog jetzt nur noch auf rechnern - wo vb drauf ist.

hat wer ne idee woran das liegt ?
 
Hi gRaf-eny,

für das CommonDialog wird die Datei Comdlg32.ocx benötigt. Diese mußt du in das Installations-Package einbinden bzw. auf den Rechner kopieren und registrieren.
 
ok danke,
also muss ich sie einfach in das verzeichnis kopieren, genauso wie es bei mir ist,
aber wie regestriere ich sie ?
 
Mit dem Programm "regsvr32" kann man Dlls / OCX-Dateien registrieren. Einfach in der Eingabeaufforderung oder in "Ausführen" eingeben und das Programm mit dem Dateipfad bzw. Namen als Parameter starten. Wenn die Datei im System32-Verzeichnlis liegt reicht der Dateiname aus, ansonsten muss der gesamte Pfad angegeben werden.
Zum Beisoiel so: regsvr32 Meinedatei.ocx
Normalerweise registrieren aber Programme die entsprechende Datei selber, wenn sie im Programmverzeichnis (der Anwendung) liegt.
 
mhh ok
schein wohl doch noch nich die lösung zu sein,
nen kumpel meint es geht nicht..
hatte es nur auf einem anderen rechner bei mir ohne vb probiert...
aber da ging es
 
Zurück