Hallo,
Mal so schnell zusammengeschnippelt:
Du benötigst eine Form als Vorlage und ein Hauptformular, von dort aus erzeugst Du dann Instanzen deiner Vorlage.
Delphi-Quellcode:
INTERFACE
USES
Windows,
Messages,
SysUtils,
Classes,
Graphics,
Controls,
Forms,
Dialogs,
FVorlage; // beinhaltet Form-Klasse "TaFVorlage" die Du mit Delphi erstellt hast
VAR
aForm : TaFVorlage; // Formvorlage
PROCEDURE TFMain.ShowErrorDLG; // Dialog zeigen
BEGIN
aForm := TaFVorlage.Create(Application);
WITH aForm DO
BEGIN
TRY
aSaveDialog := TSaveDialog.Create(aForm);
Caption := 'SuperDuper'
Showmodal;
FINALLY
aSaveDialog.Free;
Free;
END;
END;
Ups, Sakura war schneller, aber jetzt ists schon passiert!
Armin P. Pressler