Probiere mal folgendes :
Delphi-Quellcode:
MyQuery1.SQL.Clear;
MyQuery1.SQL.Add('SHOW Status;');
MyQuery1.Open;
while not MyQuery1.Eof do
begin
Memo1.Lines.Add(MyQuery1.FieldsByName('VariableName').AsString + ' = ' + MyQuery1.FieldsByName('Value').AsString);
MyQuery1.Next;
end;
MyQuery1.Close;
(Nur so runtergetippt.)
Nun sollten Dir alle Werte in einem Memo angezeigt werden.