taal: borland delphi5
component om mysql te accessen: libmysql
code:
als ik dan refresh (mijn table heef 5000records..)
cracht ie bij record 23,5

weet iemand waar dit aan kan liggen? op het moment dat hij crached is de query al uitgevoerd en alle data staat al in mysqlrec
component om mysql te accessen: libmysql
code:
code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
| procedure Tmainform.refreshClick(Sender: TObject);
var
presults: pmysql_res; //results structure *pointer
prow: pmysql_row; //row structure *pointer
i,j: Integer; //Counter vars
query: String;
begin
query:= 'SELECT id,anaam,straat,plaats,Tthuis FROM klanten order by id;'; //Query text
presults:= nil;
try
mysql_query(@datamodule3.mysqlrec, PChar(query)); //Send Query to server
presults:= mysql_store_result(@datamodule3.mysqlrec); //Store results locally
grid1.Cells[0,0]:= 'ID';
grid1.Cells[1,0]:= 'Naam';
grid1.Cells[2,0]:= 'Adres';
grid1.Cells[3,0]:= 'Plaats';
grid1.Cells[4,0]:= 'Telnr';
grid1.rowcount:=presults^.row_count+1;
for i:= 1 to presults^.row_count do begin
prow:= mysql_fetch_row(presults);
for j:= 0 to presults^.field_count -1 do begin
grid1.Cells[j, i]:= prow^[j]; // Index into row for fields
end; // j
end; // i
finally
mysql_free_result(presults); //release the stored results from memory
end;
end; |
als ik dan refresh (mijn table heef 5000records..)
cracht ie bij record 23,5
weet iemand waar dit aan kan liggen? op het moment dat hij crached is de query al uitgevoerd en alle data staat al in mysqlrec