Código Delphi [-]var v : Variant; Direccion, Telefono : String; begin // La funcion ConsultaSQL retorna un Variant; Obvio esta la debes de definir. V := ConsultaSQL('SELECT DIRECCION, TELEFONO FROM MITABLA'); Direccion := V[0]; Telefono := V[1];
var v : Variant; Direccion, Telefono : String; begin // La funcion ConsultaSQL retorna un Variant; Obvio esta la debes de definir. V := ConsultaSQL('SELECT DIRECCION, TELEFONO FROM MITABLA'); Direccion := V[0]; Telefono := V[1];