Thema: Delphi löcher inner wand

Einzelnen Beitrag anzeigen

Benutzerbild von Hador
Hador

Registriert seit: 11. Dez 2004
Ort: Recke
682 Beiträge
 
Turbo Delphi für Win32
 
#5

Re: löcher inner wand

  Alt 3. Jan 2007, 11:00
Hier mal der ungefähre Ablauf, wie du es machen müsstest:
1. Neues TBitmap erstellen (bmp := TBitmap.Create
2. Mit LoadFromFile Einschussloch aus der Datei laden (bmp.LoadFromFile(<Dateiname>))
3. Die Bilder jeweils mit draw auf den Zielcanvas kopieren (Canvar.Draw(X, Y, bmp))
4. Am Ende das Bitmap wieder freigeben (bmp.Free)

- Am besten du erstellst das BMP ganz am anfang und zerstörst es bevor dein Prgm. beendet wird.
- Evtl. kannst du dir ja mal Hier im Forum suchenRessourcen angucken. Damit kannst du das Bild dann direkt in dein Prgm. einbinden. Statt LoadFromFile musst du dann lediglich LoadFromRessource verwenden.
- Bei der Syntax von Draw bin ich mir nicht 100%ig sicher. Evtl. musst du die Parameterreihenfolge vertauschen.
Lars Kiesow
http://www.larskiesow.de

Computer gehorchen deinen Befehlen, nicht deinen Absichten.
  Mit Zitat antworten Zitat