é simples, mas nao lembro

Delphi

30/05/2003

Tento um campo que esta como valor money e fiz o seguinte para incluir o valor nele pelo edit:
[b:718f99d092] dm.Qr_ServicosDespValor.Value:=edit1.Text; [/b:718f99d092]

e outro campo do tipo datetime:
[b:718f99d092] dm.Qr_ServicosDespData.Value:=edit2.Text; [/b:718f99d092]

e tambem dar erro como que eu faço para resolver isso agradeço!


Coppola

Coppola

Curtidas 0

Respostas

Tales

Tales

30/05/2003

Tento um campo que esta como valor money e fiz o seguinte para incluir o valor nele pelo edit: [b:b385c29757] dm.Qr_ServicosDespValor.Value:=edit1.Text; [/b:b385c29757] e outro campo do tipo datetime: [b:b385c29757] dm.Qr_ServicosDespData.Value:=edit2.Text; [/b:b385c29757] e tambem dar erro como que eu faço para resolver isso agradeço!


vc tem que transformar o string para Float (Num Decimal) e a data para Date ou DateTime...

Declare SysUtils na Uses (Normalmente já esta declarado)

dm.Qr_ServicosDespValor.Value:= StrToFloat(edit1.Text)
dm.Qr_ServicosDespData.Value:= StrToDate(edit2.Text)

Algo mais ou menos assim, comece o comando e clike Ctrl+Barra de Spaço e ele completa para vc...
:twisted:


GOSTEI 0
Tales

Tales

30/05/2003

Usa o FieldByName...

a Sintaxe é mais ou menos assim....

DataModule.ClientDataSet.FieldByName(´NomeDoCampo´).AsTipoDoCampo := Valor;

onde...

DataModule = Nome do Seu Data Module
ClientDataSet = Nome do Seu Client Data Set ou Table
Nome Do Campo = Nome do campo entre ´ ´
AsTipoDoCampo = Ex: AsString, AsInteger, AsFloat...
Valor = Valor que se quer atribuir ao campo
:twisted:


GOSTEI 0
POSTAR