Hallo zusammen,
nochmal ne einfach Frage:
Ich habe ein Project mit 2 Units und 2 Forms.
Ich möchte nach einem Button Click im FormA von UnitA das FormB von UnitB öffnen,
und mit einem Klick auf das Kreiz rechts oben von FormB oder Klick auf einen Button
dieses Form wieder schliessen.
Hat da jmd. einen kleinen Tipp?
Vielen Dank schonmal, Raena.
Delphi-Quellcode:
unit Unit2;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm2 =
class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form2: TForm2;
implementation
{$R *.dfm}
procedure TForm2.Button1Click(Sender: TObject);
begin
???????
end;
end.
unit Unit4;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm4 =
class(TForm)
Edit1: TEdit;
procedure Edit1Change(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form4: TForm4;
implementation
{$R *.dfm}
end.
[edit=SirThornberry]Delphi-Tags geschlossen und Titel korrigiert - Mfg, SirThornberry[/edit]