ADOConnection -> String festlegen nach dem Programmstart

[pbc11]

Hallo alle zusammen!
Schreibe gerade ein Programm, welches mit einer Access-Datenbank arbeitet. Es wäre schön, wenn ich aus dem Programm aus wählen könnte, wo sich die Datenbankdatei befindet. Leider weiss ich nicht, wie und ob ich das realisieren kann.
Bis jetzt habe ich immer einen festen Pfad in das ConnectionString eingetragen. Aber es ist doooof, wenn ich's jedes mal neu kompilieren muss.
Danke im voraus!

[Christian Marquardt]

Mittels eines Dialoges in dem der Nutzer eine Auswahl trifft

[pbc11]

Ich glaub, ich hab es jetzt selber rausgefunden.

void __fastcall TForm1::Button1Click(TObject *Sender)
{
AnsiString asConnection = "", asSQL = "";
if (Form1->OpenDialog1->Execute()){
        asConnection = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=";
        asConnection += Form1->OpenDialog1->FileName;
        asConnection += ";Persist Security Info=False";
        Form1->ADOConnection1->ConnectionString = asConnection;
        asSQL = "SELECT * FROM katalog";
        Form1->ADOQuery1->Close();
        Form1->ADOQuery1->SQL->Clear();
        Form1->ADOQuery1->SQL->Add(asSQL);
        Form1->ADOQuery1->Open();
        }
}