Kundenliste

[EdAdvokat]

Create und Destroy:

Delphi-Quellcode:

procedure TFRMMainCustomer.FormCreate(Sender: TObject);
begin
  CustomerList:=TCustomerList.Create;
  connect;
end;

procedure TFRMMainCustomer.FormDestroy(Sender: TOBject);
begin
  CustomerList.Free;
end;

reicht das so?