openfile + savefileDialog

[mikenrw]

Hallo,

eine Anfängerfrage:

Wie implementiere ich OpenFile- und SaveFile-Dialog unter Delphi 2005.Net ?

LG

Mike

[edit=Sharky].NET als Sprache eingefügt. Mfg, Sharky[/edit]

[Sharky]

Hai Mike,

ersteinmal: "Herzlich Willkommen in der Delphi-PRAXiS" :hi:

Unter .NET gibt es ja auch einen OpenFileDialog.

Ich habe den eben mal zum Test so aufgerufen:

Delphi-Quellcode:

procedure TWinForm.Button1_Click(sender: System.Object; e: System.EventArgs);
begin
  if (OpenFileDialog1.ShowDialog = System.Windows.Forms.DialogResult.OK) then
  begin
    Label1.Text := OpenFileDialog1.FileName;
  end;
end;

Das geht sicher auch anders. Aber mit .NET habe ich nocht nichts gemacht :oops:

[DP-Maintenance]

Dieses Thema wurde von "Sharky" von "Programmieren allgemein" nach "VCL / WinForms / Controls" verschoben.
Könnte hier besser aufgehoben sein.

[mikenrw]

Hallo Stephan,

vielen Dank für Deine Antwort!. Mal sehen, ob ich es hinkriege.

#Mike

[Master_BB]

hier noch die code only variante

Delphi-Quellcode:

function getFile : String;
var
  AOpenFileDialog : OpenFileDialog;
begin
  AOpenFileDialog := OpenFileDialog.Create;
  if AOpenFileDialog.ShowDialog = System.Windows.Forms.DialogResults.Ok then
    Result := AOpenFileDialog.FileName
  else
    Result := '';
end;

freigeben tut der Garbage collector
welche unit du noch einbinden mußt für die dialoge
weiß ich jetzt nicht aus dem kopf, steht aber in der hilfe.
ich glaube system.windows.forms