ich habe das mal eingefügt
jedoch bekomme ich einen error:
Delphi-Quellcode:
if Assign(TClientForm) then begin
Connect(Server.Text,StrToInt(Port.Text));
end
else begin
with TClientForm.Create(Self) do begin
ClientName := Username.Text;
Connect(Server.Text,StrToInt(Port.Text));
Show;
end
end
[Error] Login.pas(63): Incompatible types: 'TPersistent' and 'Class reference'