serial von mysql db abfragen

[shmia]

In den Code Schnippseln oben sind noch Fehler drin. Vorallem wird kein Speicher im String "ress" reserviert.
Aber es geht auch viel einfacher:

Delphi-Quellcode:

procedure TForm1.Button2Click(Sender: TObject); 
var 
    res: TStringStream;  // kein MemoryStream
    ress: string; 
begin 
   res := TStringStream.Create; 
   try
     idhttp1.Get('xxx?serial=1233', res); 
     edit1.Text := res.DataString; 
   finally
     res.Free;
   end;
end;

E2171 Auf Variable 'res' kann wegen Optimierung nicht zugegriffen werden
==> hier müsste man bei den Projektoptionen / Compiler die Optimierung ausschalten und das Projekt neu erzeugen.
aber das ist mit obigem Code ja nicht mehr nötig...