임의의 만들어진 프로퍼티 같습니다.

Params[3].AsCurrency := StrToInt64Def(edtUnitPrice.Text, 0);

이런식으로 사용하시면 될 것 같습니다.


cuperido


강가딘 님이 쓰신 글 :
: TEdit컴포의 속성중..MoneyValue라는 속성이 있는지요?
: 모 강좌의 소스에서..아래와 같은 소스를 봤는데.
: edtUnitPrice.MoneyValue라는 것이있는데.(edtUnitPrice:TEdit)
: Object Inspector 에도 없는 속성이던데..
: 이거맞는 속성인지요...????
: -----------------
: .........생략........
:         close;
:         Sql.Clear;
:         Sql.Add('insert into OrderItems(OrderID,OrderItemsID,BookID,UpitPrice,');
:         Sql.Add(' Qty,DCRate,TotalPrice ' );
:         Sql.Add(' values(:p1,:p2,:p3,:p4,:p5,:p6,:p7)' );
:         Params[0].AsInteger := StrToInt(edtOrderNo.Text);
:         Params[1].AsInteger := StrToInt(edtDetailNo.Text);
:         Params[2].AsInteger := StrToInt(edtBook.Text);
:         Params[3].AsCurrency := edtUnitPrice.MoneyValue;
: ..........생략......
: -----------------------------