Forum: Multimedia
Delphi
by Christian Seehase,
11. Jul 2002
Moin Traumzauberbaum,
Durch Deine Variablendeklaration erzeugst Du eine Variable Filename vom Typ TPicture.
TPicture ist ein Objekt, dass vor der Benutzung erst einmal erzeugt werden muss.
Da dies bei Dir nicht der Fall ist, hat Filename einen undefinierten Wert.
Die Zeile
FileName := TPicture.Create;
fehlt.
Dadurch wird ein TPicture Objekt erzeugt, und dessen Adresse in der...
Forum: Multimedia
Delphi
by Christian Seehase,
11. Jul 2002
Moin Traumzauberbaum,
meinst Du das:
procedure TForm1.Button1Click(Sender: TObject);
begin
if not OpenPictureDialog1.Execute then
begin
exit;
end;
// Wenn's Öffnen geklappt hat