Bingo!
Delphi opnieuw gestart, nieuw project. Gaat nu iets doen. Ik weet niet precies wat er mis ging. Misschien was Delphi een beetje in de war of zo. Nu heb ik in ieder geval een tweede form.... we gaan verder....
Code:
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, System.ComponentModel, Borland.Vcl.StdCtrls, Unit2;
type
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
form2: Tform2;
implementation
{$R *.nfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
form2:=tform2.create(self) ;
form2.showmodal;
end;
end.
Bookmarks