Código Delphi [-] Var S:String; begin S:=Query1.Fields[0].AsString; ShowMessage(s); end;
Var S:String; begin S:=Query1.Fields[0].AsString; ShowMessage(s); end;