Image.Picture.Width
geht. Und nein, ich würde es nicht irgendwo anders anpassen. Dann lagerst du den entscheidenden Code für die
Unit in eine andere
Unit aus. Möglich, aber versteh und wundere dich mal in einem Jahr warum sich das Formular an das Bild von Zauberhand anpaßt
Und weil wir schon da sind noch zwei Tipps. Das Formular mit dem Bild muß ja wieder geschlossen. Möglichkeit 1:
Delphi-Quellcode:
procedure Tfrm_Bild.Image1Click(Sender: TObject);
begin
Close
end;
Dann braucht man nicht ein Close einbauen oder auf den roten Button klicken. Besser ist aber wenn das Formular von Zauberhand verschwindet. Dazu darf das Bild-Formular nicht ShowModal gestartet werden, sondern Show:
Delphi-Quellcode:
//frm_Bild.ShowModal
frm_Bild.Show
Dann in Bild-Formular unter FormDeactivate Close einbauen
Delphi-Quellcode:
procedure Tfrm_Bild.FormDeactivate(Sender: TObject);
begin
Close;
end;
Das Bild wird sichtbar und wenn man danebenklickt, dann wird es automatisch geschlossen