TImage

Abb. 1.01 TImage

Die Komponente TImage findest du unter Additional dem zweiten Reiter von dem Hauptfenster von Lazarus und Free Pascal. Sie ist die vierte Komponente von Links. Du kannst die Komponente in dein Form1 einfügen indem du das TImage anklickst und dann in dein Form1 klickst. Die Komponente beinhaltet nun ein viereckiges Feld und hat an den Ecken und zwischen zwei Ecken Punkte. An diesen Punkten kannst du mit der Maus ziehen um die Komponente TImage zu positionieren.

Im Objektinspektor kannst du dir unter der Eigenschaft Picture das Feld (TPicture) anklicken. Auf der rechten Seite erscheint nun ein Button mit drei Punkten und diesen kannst du nutzen um dein Bild auszuwählen und durch das klicken auf den OK Button fügst du es in die Komponente ein. Du kannst auch im Objektinspektor von Lazarus die Höhe (Height) die Weite (width) die Position von oben (Top) und die Position von links (left) bestimmen.
Während der Laufzeit z.B. während des Labens eines Formulars kannst du ein Bild zu der Komponente hinzufügen oder auch wechseln. Anbei ein Beispiel.

Quellcode:
01: procedure TForm1.FormShow(Sender: TObject);
02: Begin
03: Image1.Picture.LoadFromFile('img/logo.png');
04: end;

In Zeile 01 sehen wir das wir eine Prozedure mit dem Namen TForm1.FormShow() ausführen. Zum Zeitpunkt der Darstellung des Formulars führen wir die Prozedure aus. In Zeile 03 leiten wir den Anweisungsblock ein. In Zeile 04 laden wir für doe Komponente Image1 mit der Eigenschaft Picture eine neue Komponente mit der Prozedure LoadFromFile(). Die Pfadangabe lautet ‘img/logo.png ‘. Hier ist es wichtig zu beachten das du z.B. nicht ‘/img/logo.png ‘ schreibst. Dies ist zwar nur ein kleiner Unterschied Lazarus produziert hier im Debugger einen Fehler. Ich hänge dir das Kleine Programm an die Beschreibung an zusammen mit dem Bild. Um eine Ähnliche kleine Dateigröße zu erhalten gehe auf Projekte -> Projekteinstellungen dann auf Debuggen und dann auf Debugger Informationen für GDB erzeugen (Verlangsamt das Kompilieren) den Haken herausnehmen und einmal neu kompilieren.

Zum herunterladen: Anwendung