Form1-function-Form2

[t0mmy]

Also ich habs jetzt mal angeschaut. Dann stimmt was bei der Funktion nicht:

Sie gibt mir als Rückgabewert False -.-

Hier mal ein auszug:

Delphi-Quellcode:

function Connection_Herstellen(pConnection: TADOConnection; pConnectionString: String): Boolean;
begin
    if pConnection.Connected = False then
    begin
      pConnection.ConnectionString := pConnectionString;
    try
      pConnection.Open;
      Result := True;
    except
    on E: Exception do
      begin
        Result := False;
        //MessageBox(0, 'Fehler beim Verbinden mit der Datenbank!', '',
        //MB_ICONERROR or MB_OK);
      end;
    end;
    end;
end;