Funktion in selbst erstellter Form

[DelphiUser1]

Zitat:

Hilf einem alten blinden Mann, wo ist besagter Aufruf zu sehen?

Ich glaube ich bin der blinde Mann, es ist tatsächlich noch nicht hier. Seltsam, wie man sich irren kann

Delphi-Quellcode:

procedure TForm1.Button2Click(Sender: TObject);
begin
if (Edit3.Text='') or (Edit4.Text='') or (MaskEdit1.Text='') or (Edit6.Text='') or (ComboBox3.Text='') or not (Checkbox4.Checked) then
ShowMessage('Ungenügende Angaben')
else
myform:=TReg.CreateNew(Self);
with myform do
    begin
    visible := true;
    Caption := 'Registrieren(2/2)';
    Left := Form1.Left;
    Top := Form1.Top;
    ClientHeight := Form1.ClientHeight;
    ClientWidth := Form1.ClientWidth;
    Autoscroll:=false;
    Color:=clblack;