Datasource zur Laufzeit

[M. Engel]

Hallo,

wie kann ich die bei einem DBGrid zur Laufzeit die Datasource ändern ?

Micha

[Falk Prüfer]

Mit DBGrid1.DataSource := AndereDataSource;

Gruß Fal

[M. Engel]

Hallo Falk,

ich glaub ich habe meine Frage falsch gestellt.
Ich will den Wechsel der Datasource über eine ComboBox steuern.

DBGrid1.Datasource := ComboBox1.Text;

bringt mir die Fehlermeldung inkompatible Typen, da weiss ich nicht
weiter. Vielleicht noch ne Idee ?

Mich

[Falk Prüfer]

Hi Micha,

TDBGrid.DataSource ist vom Typ TDataSource und deshalb kannst Du nicht einfach einen String zuweisen. Für Dein Vorhaben mußt Du im Programm entsprechend Vorsorge treffen:

.<br>
.<br>
.<br>
if ComboBox1.Text = 'Erste DataSource' then DBGrid1.DataSource := DataSource1<br>
else if ComboBox1.Text = 'Zweite DataSource' then DBGrid1.DataSource := DataSource2 ... etc<br>
<br>
Gruß Fal

[M. Engel]

Hallo Falk,

das wars. Danke.

Mich

[Uli Becker]

Hallo,

kann man auch mit einer Scheife lösen, dadurch wird das Ganze unempfindlicher gegen spätere Änderungen:

<pre>
var i : integer;
begin
for i := 0 to ComponentCount -1 do
if (components[i].name = comobox1.text) and (components[i] is TDatasource) then
dbedit1.Datasource := components[i] as TDataSource;
...
end;
<pre>

oder noch einfacher:

<pre>
dbedit1.Datasource := FindComponent(comobox1.text) as TDatasource;
</pre>

Gruß Ul