File open dialoog
De file open dialoog staat in de tab dialogen van Lazarus
Zet het component op je form en voeg een button en een image component toe.
Wijzig de caption van de button in Open file. dubbelklik op de button om de code van het click event toe te voegen:
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
if OpenDialog1.Execute then
Image1.Picture.LoadFromFile(OpenDialog1.FileName);
end;
Run het programma en click op de knop, de dialoog komt dan te voorschijn en kun je een file uitkiezen. Klik op Openen om de gkozen file aan de image toe te kennen. Deze wordt vervolgens getoond.
Tot zover het gebruik van de fileopendialoog.
©2025 Don Wilbrink.
E-mail: d.wilbrink@freedom.nl
