Insert Lines Into a Memo
produsys
Brazil
Hi friends,
I'm trying insert a line into a memo on execution time using a while.
See my example:
How can I insert a line into a memo in Execution Time? I'm waiting for help!
I'm trying insert a line into a memo on execution time using a while.
See my example:
while not Query1.Eof do
begin
 if Trim(Memo41.Memo)<>'' then
  Memo41.Memo := Memo41.Memo + #13 + [DialogForm.Query1."buy_value"]
 else
  Memo41.Memo := [DialogForm.Query1."buy_value"];
 Query1.Next;
end;
Where the '#13' is a ASCII code for the Return Key. I'm need this because i'm using two Queries. But it not insert a new line, it gives an error message: Invalid Variant Operation.How can I insert a line into a memo in Execution Time? I'm waiting for help!
Comments