exe-Datei auf unterschiedlichen Computern

[Klaus01]

Delphi-Quellcode:

procedure TForm1.Bildladen1Click(Sender: TObject);
begin
 Bild:=Rechts.PopupComponent as TImage;         //wo das Popup-Menü aufgerufen wurde
 Oeffnen.Execute;       //OpenPictureDialog
end;

Delphi-Quellcode:

procedure TForm1.Bildladen1Click(Sender: TObject);
begin
 Bild:=Rechts.PopupComponent as TImage;         //wo das Popup-Menü aufgerufen wurde
 if Oeffnen.Execute then       //OpenPictureDialog
   begin
     Bild.Picture.LoadFromFile(Oeffnen.FileName);           
   end;
end;

Denn wenn der Dialog wieder geschlossen ist, ist es nicht sicher, dass
Oeffnen.FileName noch richtig ist.

Grüße
Klaus

[loirad]

Warum sollte es nach dem Schließen nicht mehr richtig sein? Außerdem lag der Fehler nicht beim Laden des Bildes, sondern beim Zeichnen der Rahmen - sie wurden außerhalb der Image-Komponenten gezeichnet!

[Klaus01]

Zitat von loirad:

Warum sollte es nach dem Schließen nicht mehr richtig sein? Außerdem lag der Fehler nicht beim Laden des Bildes, sondern beim Zeichnen der Rahmen - sie wurden außerhalb der Image-Komponenten gezeichnet!

und das steht wo in Deinem Eingangspost?

Grüße
Klaus

[loirad]

Nirgends - Entschuldigung, dass ich es vergessen hab zu erwähnen - wäre vielleicht sinnvoll gewesen