Entwickler-Ecke
Datenbanken - [MyBase] TTable TableName einstellen
PPaB - Fr 22.05.09 20:18
Titel: [MyBase] TTable TableName einstellen
Wie kann ich in der Table den TableName einstellen ?
Bei mir gibt es da nichts zur Auswahl und in den Erklärungen steht, dass da die Datenbank reingehört,
aber was muss ich ändern, damit das bei meiner MyBase-Datenbank funktioniert?
koegi - Fr 22.05.09 21:22
 PPaB hat folgendes geschrieben  : |
Wie kann ich in der Table den TableName einstellen ?
Bei mir gibt es da nichts zur Auswahl und in den Erklärungen steht, dass da die Datenbank reingehört,
aber was muss ich ändern, damit das bei meiner MyBase-Datenbank funktioniert? |
Hallo, PPaB!
Du arbeitest bei Verwendung von MyBase gar nicht mit
TTable, sondern mit
TClientDataSet.
Am besten schaust Du dir mal das folgende Tutorial an. Damit habe ich auch den Einstieg in MyBase geschafft:
http://www.delphi-treff.de/tutorials/datenbanken/einfache-datenbanken-mit-mybase/page/1/
Viel Erfolg!
Gruß
Thomas
PPaB - Fr 22.05.09 22:06
Genau die habe ich auch benutzt und dann kam ich zu dieser Seite:
http://www.delphi-treff.de/tutorials/datenbanken/datenbank-einstieg/page/5/
Hier ist der Quelltext:
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
| Table2.DisableControls;
Table2.First;
a:=1;
while not Table2.eof do begin
if Table2.FieldByName('Liederbuch').AsString='COOL' then
StringGrid1.Cells[0,a] :=Table1.FieldByName('ID').AsString;
StringGrid1.Cells[1,a] :=Table1.FieldByName('Liederbuch').AsString;
StringGrid1.Cells[2,a] :=Table1.FieldByName('Nummer').AsString;
a := a +1;
StringGrid1.Row := StringGrid1.Row + 1;
Table2.next;
end;
Table2.EnableControls; |
Wenn du mir erklären könntest, wie ich soeine Abfrage ohne die Table machen kann, wäre ich dir sehr dankbar.
Chemiker - Fr 22.05.09 22:19
Hallo PPaB,
das besieht sich auf die BDE.
Du benutzt direkt ClientDataSet.
Bis bald Chemiker
Robert.Wachtel - Fr 22.05.09 22:20
TTable ist abgeleitet von TDataSet. TClientDataset ebenfalls.
PPaB - Fr 22.05.09 23:14
Danke es klappt.
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
| ClientDataSet2.DisableControls;
ClientDataSet2.First;
a:=1;
while not ClientDataSet2.Eof do begin
if ClientDataSet2.FieldByName('Liederbuch').AsString='COOL' then
begin
StringGrid1.Cells[0,a] :=ClientDataSet2.FieldByName('ID').AsString;
StringGrid1.Cells[1,a] :=ClientDataSet2.FieldByName('Liederbuch').AsString;
StringGrid1.Cells[2,a] :=ClientDataSet2.FieldByName('Nummer').AsString;
a := a +1;
StringGrid1.RowCount := StringGrid1.RowCount + 1;
end;
ClientDataSet2.Next;
end;
ClientDataSet2.EnableControls; |
Der Code falls es später jemanden interessiert, der das gleiche Problem hat.
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!