@kepew nich saya berikan sepenggal coding saya tapi cuman depan na aza :(, n kamu harus cari ujungnya yach :D. Klo mo lebih mantab bs minta bantuan dari Suhu2 yang ada disini. :D

  try  
    AdoConnect.ConnectionString := Connect;
    AdoConnect.Open;
    //MyIni.Free;
  except
    on E:Exception do
    begin
      DisplayMemo.Lines.Add('Unable to Connect to DB :' + E.Message);
      Exit;
    end;
  end;
  
  DisplayMemo.Lines.Add('Server Ready');