Como atribuir o valor de um DBEdit � uma vari�vel?

Question

Tenho uma vari�vel q est� declarada como string, gostaria de pegar o texto de um DBEdit e atribu�-lo para esta vari�vel....
por exemplo

NAssunto:= DBEdit1.Field.AsString;

Mas assim ele da erro por causa do asString, qdo coloco asInteger ele ateh roda, mas dah erro tb.

Pauldiano66 · Answer

so uma pergunta ,quanto tempo vc trabalha com o delphi,bom tudo que � escreti em uma edity � textyo certo,ent�o9 vc tem que ver a propiedade do objeto,exemplo

varial:=dbedit1.text;

pronto � facil.

Wolverine · Answer

:lol:
vc � pode retirar os valores de um DbEdit e sim do Table

basta indicar o campo q vc quer, como se fosse o DbEdit q vc quer atribuir, come�ando do 0

procedure TForm1.atribuir(Sender: TObject);
var
x:String;

begin

x:=Table1.Fields[0].AsString;
//ou
Edit1.Text:=x;
//ou
Edit1.Text:=Table1.Fields[2].AsString;

end;

Blz, ate +, qquer coisa estou ai

Wolverine · Answer

Rir da d�vida dos outro � assumir a sua pr�pria arrog�ncia!!!!!!!!

Eu q lhe pergunto quanto tempo vc trabalha com o delphi ?
Fazer oq vc dize vai sempre armazenar o campo crescente (o 1� dado, entende) da tabela
E �bom tudo que � escreti� oq q � isso, matou aula

Sma · Answer

Ola...vi sua d�vida e posso e ajudar, mas ja faz algum tempo q vc escreveu, mas se estiver precisando mesmo assim pode entrar em contato que lhe ajudo rapidinho...Boa Sorte...Sandro Miguel.......

Edilsoneto · Answer

unit Unit1;interfaceuses  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,  StdCtrls, Db, DBTables, Mask, DBCtrls;type  TForm1 = class(TForm)    DBEdit1: TDBEdit;    DataSource1: TDataSource;    Table1: TTable;    Button1: TButton;    procedure Button1Click(Sender: TObject);  private    { Private declarations }  public    { Public declarations }  end;var  Form1: TForm1;implementation{$R *.DFM}varx:string;procedure TForm1.Button1Click(Sender: TObject);beginx:=DBEdit1.Text;showmessage(x);end;end....

F�rum Como atribuir o valor de um DBEdit � uma vari�vel? #204126