Asynchrone Verbindungen erzwingen
Nach oben zu Verbindungen optimieren
Über die Eigenschaft ConnectOptions lässt sich erzwingen, dass die einzurichtende Verbindung asynchron sein soll. Solche Verbindungen ermöglichen es der Anwendung, die Verarbeitung fortzusetzen, ohne darauf warten zu müssen, bis die Verbindung vollständig hergestellt ist.
Per Voreinstellung ist die Eigenschaft ConnectionOptions auf coConnectUnspecified gesetzt. Diese Einstellung ermöglicht es, den Server entscheiden zu lassen, welche Art der Verbindung am besten geeignet ist. Wenn Sie eine Verbindung explizit als asynchrone Verbindung herstellen möchten, setzen Sie die Eigenschaft ConnectOptions auf coAsyncConnect.
Die folgenden Beispielroutinen zeigen, wie asynchrone Verbindungen in der angegebenen Verbindungskomponente aktiviert und deaktiviert werden:
procedure TForm1.AsyncConnectButtonClick(Sender: TObject);
begin
with ADOConnection1 do begin
Close;
ConnectOptions := coAsyncConnect;
Open;
end;
end;
procedure TForm1.ServerChoiceConnectButtonClick(Sender: TObject);
begin
with ADOConnection1 do begin
Close;
ConnectOptions := coConnectUnspecified;
Open;
end;
end;
void __fastcall TForm1::AsyncConnectButtonClick(TObject *Sender)
{
ADOConnection1->Close();
ADOConnection1->ConnectOptions = coAsyncConnect;
ADOConnection1->Open();
}
void __fastcall TForm1::ServerChoiceConnectButtonClick(TObject *Sender)
{
ADOConnection1->Close();
ADOConnection1->ConnectOptions = coConnectUnspecified;
ADOConnection1->Open();
}