Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations wOOdy-Soft on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Recent content by UKChris

  1. UKChris

    RTF Source from RichEdit Control?

    I'm trying to figure out if I can get RTF Text from a Rich Edit Control. If I put the control on screen I can paste into it nice formatted text and it displays fine. However, if I copy the RichEdit1.Lines to a Memo1.Lines it all appears as plain text, what I'm looking for is text with RTF...
  2. UKChris

    Significant Digits - Extended Data Type?

    With help from elsewhere it seems this does it for me: showmessage(floattostrF(a,ffGeneral,18,18)); Lucky that 18 digits will do it for my app! Chris.
  3. UKChris

    Significant Digits - Extended Data Type?

    My number seems to be truncating, is Extended the data type with the greatest range? Int he following code: procedure TForm1.Button2Click(Sender: TObject); var a : extended; begin a := 1.123456789123456789; showmessage(floattostr(a)); end; The Message shows as 1.12345678912346 seems it only...
  4. UKChris

    Convert Extended to String?

    Terrific, thanks!
  5. UKChris

    Convert Extended to String?

    How do I convert variable of type Extended to a string so that I can put the value in an Edit Control? I have something like: var a : extended; begin a := 1.123456789123456789; EditBox.Text := (10 * a); end; But it will not convert the Extended to a string for the edit box. I looked at...

Part and Inventory Search

Back
Top