Ergebnis der Suchanfrage

• Forum: Programmieren allgemein

  AW: Form1-function-Form2

   
    by Klaus01, 11. Jan 2012
  sorry:
  
  function Connection_Herstellen(pConnection: TADOConnection; pConnectionString: String): Boolean;
  begin
  Result := False;
  if not pConnection.Connected then
  begin
  pConnection.ConnectionString := pConnectionString;
  pConnection.Open;
  Result := True;