Einzelnen Beitrag anzeigen

The_Doomed

Registriert seit: 5. Dez 2007
101 Beiträge
 
#1

Problem mit TOpen- + TSaveDialog

  Alt 28. Apr 2008, 21:39
also wie im titel schon gesagt hab ich ein problem mit den beiden dialogen
in meinem Prog liegen diese in der MainForm wenn ich nur speichern will hab ich eine zweite formgebastelt
welche rolloverbutton beinhaltet deren Grafiken mit loadfromfile geöffnet werden
wenn ich dann meine xml datei speichern will und sich der speichern bzw öffnen dialog öffnet
sucht er jedes mal nach den rolloverbildern und bring dann einen EFOpen bzw EFSave Error


hier noch n kleiner auszug aus der form fürs speichern (database ist die hauptform

Delphi-Quellcode:
begin
database.OpenDialog1.InitialDir:= GetCurrentDir;
if database.OpenDialog1.Execute then
database.ClientDataSet1.LoadFromFile(database.OpenDialog1.FileName);
end;

procedure Tloadsaveform.loadbtnMouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
loadbtn.picture.LoadFromFile('icons\openoc.gif');
end;

procedure Tloadsaveform.loadbtnMouseEnter(Sender: TObject);
begin
loadbtn.picture.LoadFromFile('icons\openro.gif');
end;
Zeit totschlagen entehrt den Menschen, schaffen in ihr was bleibt,
erst das heißt gelebt haben wie ein Mensch.
Hans Joachim Ploß

MFG The_Doomed
  Mit Zitat antworten Zitat