in dbctrlgrid nur max 5 einladen

[agm65]

guten morgen freunde...ich bin hier am verzweifeln...ich möchte in meinem dbctrlgrid maximal 5 db einträge anzeigen lassen. um damit die ladezeit zu verkürzen.

Delphi-Quellcode:

Screen.Cursor := crHourGlass;

frmMain.QueryLoadData.Close;
frmMain.QueryLoadData.sql.Clear;
frmMain.QueryLoadData.sql.text := 'SELECT id,test1,test2 FROM test where deleted = 0';
frmMain.QueryLoadData.Open;



dbcount := frmmain.DataSource.dataset.RecordCount; 
fmnavbarvehicles.lblHeader1.Caption := fmnavbarvehicles.lblHeader1.Caption + ' (' + inttostr(MaxAnzeige) + '/' + inttostr(dbcount) + ')';



frmMain.QueryLoadData.Close;
frmMain.QueryLoadData.sql.Clear;
frmMain.QueryLoadData.sql.text := 'SELECT top ' + inttostr(MaxAnzeige) + ' id, test1,test2 FROM test where deleted = 0';
frmMain.QueryLoadData.Open;


fmshowvehicles.DBCtrlGridShowVehicles.rowcount := maxanzeige;


Screen.Cursor := crDefault;

der untere sql zeigt mir auch nur 5 an , aber der obere scheint zuerst alle zu laden, wenn ich jetzt den oberen rausnehme, dann zeigt mir der untere nichts mehr an ? wieso ?

[uwewo]

Keine Ahnung ob es bei Deiner DB den Befehl gibt aber bei MySQL ist es.

select * from Table LIMIT 5 Uwe

[agm65]

nein, ich glaube ich weiss wo das problem liegt, ich lade die datenbank ohne zu wissen wieviele einträge sie hat und deswegen habe ich damals auch den ersten sql ausführen lassen , damit ich die anzahl der einträge bekomme...wenn ich jetzt aber.... -> einige stunden später

[agm65]

alle datenbank einträge davor counte, bzw ich mach das schon vorher und dbcount diesen wert zu weise bekomme ich genau was ich wollte ! danke trotzdem ..manchmal hilft es einfach zu posten und die lösung kommt von selbst