Array
(
)

BdpDataReader - Como ler conteudo do Campo

Josegeraldodeoliveira
   - 17 dez 2005

Ola pessoal, estou ´apanhando´ muito para buscar o conteudo do 1º campo
da rotina abaixo. Nesse exemplo, consigo identifcar os campos.
Como pegar o seu conteudo?

Desde já agradeço,

Geraldo


Var aConn:BdpConnection; aTx:BdpTransaction; aCmd:BdpCommand;
aReader:BdpDataReader; aConnStr:String; i:Integer;
aconnoptions:String;
comando:BdpCommand;

aConnStr := ´Provider=INTERBASE;assembly=Borland.Data.Interbase...
aconnoptions := ´LoginPrompt=False;SQLDialect=3´;
aconn := BdpConnection.Create(aConnStr);
aconn.ConnectionOptions := aconnOptions;
aConn.Open();
aTx := aConn.BeginTransaction();
aCmd := aConn.CreateCommand();
aCmd.Connection := aConn;
aCmd.Transaction := aTx;
aCmd.CommandText := ´SELECT FROM MTRPA´+
´ WHERE MTRPA02 ´+´´´´+´JOAO´+´´´´;
aReader := aCmd.ExecuteReader();
IF aReader <> Nil THEN
Begin
For i:=0 to aReader.FieldCount - 1 DO
Begin
MessageBox.Show(´Coluna ´+aReader.GetName(i));
End;
End;
;


Felipesrezende
   - 17 dez 2005

#Código

IF aReader <> Nil THEN 
Begin
For i:=0 to aReader.FieldCount - 1 DO
Begin
MessageBox.Show(´Coluna ´+aReader.GetName(i));
End;


Tenta esse codigo aqui!
#Código

while aReader.read do
begin
MessageBox.Show(´Coluna ´+aReader.GetName(i));
end;


Espero que funcione.. hehehe

Abraço