Registriert seit: 14. Jan 2003
Ort: Boxberg
456 Beiträge
Delphi 10.1 Berlin Professional
|
Re: [mysql] SHOW STATUS in Programm verwenden
9. Jan 2006, 15:44
Hallo,
natürlich kann man.
Folgendes Beispiel funktioniert mit eine ZQuery:
Delphi-Quellcode:
var received, send:DWord;
...
with ZQuery1 do
begin
Close;
SQL.Text:=' SHOW STATUS LIKE "Byte%"';
Open;
if (RecordCount=2) then
begin
received:=Fields[1].AsInteger;
Next;
send:=Fields[1].AsInteger;
ShowMessage(Format(' Empfangen: %d; Gesendet: %d', [received, send]);
end; // if
end; // with
...
|