Zitat von
Brueckenhauer:
dadrinne steht das:
procedure Tform1.connect();
begin
// Eigenschaften der Verbindung Anfang
FMysql.Host := '+++++';
FMysql.port := 3306;
FMysql.user :='++++';
FMysql.password := '++++';
FMysql.UnixSocket := '';
FMysql.Db := '++++'; // Datenbank auf dem Server
FMysql.UseNamedPipe := false;
FMysql.UseSSL := false;
FMysql.Compress := true;
FMysql.TrySockets := false;
// Eigenschaften der Vebindung Ende
end;
Der war gut
Wenn ich Dich richtig verstanden habe hast du FMysql im privat von Form1 deklariert. Jetzt kommst du von Form4 weisst die Werte FMysql(von Form1 zu) kehrst zu Form4 zurück und erwartest das die FMysql(von Form4) von der Zuweisung etwas mitbekommen hat. Das kann nicht funktionieren.