Limas Posted July 16, 2011 Report Share Posted July 16, 2011 Olá amigos,Estou com uma dificuldade para inserir na mesma linha do Memo um texto mais data (concatenar).Com o código abaixo ele gera o seguinte erro: Incompatible types: 'String' and 'Integer' Quando é o texto somente o sistema insere normalmente.procedure T_conscomprador.DBLookupComboBox2CloseUp(Sender: TObject);begin Editmemo.text:=TabmemoImovel.Text; DBMemo2.Lines.Add(Editmemo.text) + FormatDateTime('dd/mm/yyyy',now);end;Já tentei de várias formas mas não cosegui, se alguém puder me ajudar com este problema desde já eu agradeço.Atenciosamente.Valdir Lima Quote Link to comment Share on other sites More sharing options...
0 Jhonas Posted July 17, 2011 Report Share Posted July 17, 2011 Estou com uma dificuldade para inserir na mesma linha do Memo um texto mais data (concatenar).a maneira correta é assim:procedure T_conscomprador.DBLookupComboBox2CloseUp(Sender: TObject); begin Editmemo.text:=TabmemoImovel.Text; DBMemo2.Lines.Append(Editmemo.text + FormatDateTime('dd/mm/yyyy',now)); end;abraço Quote Link to comment Share on other sites More sharing options...
Question
Limas
Olá amigos,
Estou com uma dificuldade para inserir na mesma linha do Memo um texto mais data (concatenar).
Com o código abaixo ele gera o seguinte erro: Incompatible types: 'String' and 'Integer'
Quando é o texto somente o sistema insere normalmente.
procedure T_conscomprador.DBLookupComboBox2CloseUp(Sender: TObject);
begin
Editmemo.text:=TabmemoImovel.Text;
DBMemo2.Lines.Add(Editmemo.text) + FormatDateTime('dd/mm/yyyy',now);
end;
Já tentei de várias formas mas não cosegui, se alguém puder me ajudar com este problema desde já eu agradeço.
Atenciosamente.
Valdir Lima
Link to comment
Share on other sites
1 answer to this question
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.