| Vorheriges Thema anzeigen :: Nächstes Thema anzeigen |
| Autor |
Nachricht |
h7b5
Anmeldungsdatum: 13.07.2009
Beiträge: 10
|
 Verfasst am: 16.07.2009, 22:00 Titel: Einfgn. einer .bmp an definierbarer Position-Rat erbeten |
 |
|
n´abend Leute,
folgendes Codebeispiel aus dem FB-Portal dient zum Einfügen einer Bitmap an einer definierbaren Bilschirmposition. Die Abfrage der Bildgröße, zur Ermittlung des erforderlichen Speicherplatzes, erfolgt hier automatisch.
meine Frage:
Wie müsste der Code aussehen, wenn man die Bildgröße "manuell" übergibt? Würde er dadurch etwas kompakter?
| Code: | Screen 18,32
Dim As String dateiname = "deinBild.bmp"
Dim As Integer breit, hoch
Dim As Integer ff = Freefile
Open dateiname For Input As #ff
Get #ff, 19, breit
Get #ff, 23, hoch
Close #ff
Dim bild As Any Ptr
bild = ImageCreate(breit,hoch)
Bload dateiname, bild
Put (100,100), bild
Sleep
If bild <> 0 Then ImageDestroy bild
End |
Danke schon mal vorweg, und freundliche Grüße H7B5 |
|
| Nach oben |
|
 |
MOD
Fleißiger Referenzredakteur
Anmeldungsdatum: 10.09.2007
Beiträge: 1003
|
| Verfasst am: 16.07.2009, 22:06 Titel: |
|
|
Statt
| Code: | Dim As Integer ff = Freefile
Open dateiname For Input As #ff
Get #ff, 19, breit
Get #ff, 23, hoch
Close #ff |
zB. einfach
| Code: | Input "Breite eingeben: ", breit
Input "Höhe eingeben: ", hoch |
verwenden. |
|
| Nach oben |
|
|
h7b5
Anmeldungsdatum: 13.07.2009
Beiträge: 10
|
| Verfasst am: 16.07.2009, 22:19 Titel: |
|
|
Für die Art meiner Verwendung sollte schon eine direkte Eingabe im Code ausreichen. Dann könnt ich´s wohl auch so machen?:
Gruß h7b5 |
|
| Nach oben |
|
|
MOD
Fleißiger Referenzredakteur
Anmeldungsdatum: 10.09.2007
Beiträge: 1003
|
| Verfasst am: 16.07.2009, 22:21 Titel: |
|
|
Ja, geht auch.
In dem Fall solltest du dir den Speicherplatz allerdings sparen.
| Code: | | Dim As Integer breit, hoch |
raus aus dem Code und
| Code: | bild = ImageCreate(xxx,xxx)
statt
bild = ImageCreate(breit,hoch) |
xxx steht natürlich für deine gewählte Höhe und Breite. |
|
| Nach oben |
|
|
h7b5
Anmeldungsdatum: 13.07.2009
Beiträge: 10
|
| Verfasst am: 16.07.2009, 22:30 Titel: |
|
|
Stimmt, da ist ja die einzige Verwendung der Variablen. Also wirds noch kompakter. 
Besten Dank, werd´s gleich mal testen
mfG h7b5 |
|
| Nach oben |
|
|
|
FAQ
Suchen
Mitgliederliste
Benutzergruppen
Registrieren
Profil
Einloggen, um private Nachrichten zu lesen
Login
