I am running on Ubuntu Linux 5.10 Linux 2.6.12-10-386 #1 Sat Mar 11 16:13:17 UTC 2006 i686 GNU/Linux
Regards, - Graeme - On 23/03/06, Danny Milosavljevic <[EMAIL PROTECTED]> wrote: > Hello, > > Am Donnerstag, den 23.03.2006, 11:42 +0200 schrieb Graeme Geldenhuys: > > Hi, > > > > I have a CharaterMap dialog, which builds a string depending what the > > user clicks. This string can be accessed via a string property > > "property SelectedChars: string ..." > > > > After the user closes the CharacterMap dialog and before I free it, I > > am trying to read the SelectedChars property into a TEdit.Text. If > > the user selected characters smaller then Char(128) it works. If the > > string contains Char(128) or higher, it returns a string, but I am > > unable to display it in a TEdit, even though they where displayed it a > > TEdit in the CharacterMap dialog. > > > > I added the "s" variable so I could see what gets return while running > > inside the IDE. > > eg: > > s = #169'a' <<== Tooltip evaluation shows this > > > > After the dialog closes the edPassword.Text shows nothing when it > > should actually show the copyright sign with the letter a. > > > > -------------------------------------- > > procedure TLoginForm.btnCharMapClick(Sender: TObject); > > var > > frm: TfrmCharMap; > > s: string; > > begin > > frm := TfrmCharMap.Create(nil); > > try > > frm.ShowInsert := True; > > frm.ShowModal; > > if frm.ModalResult = mrOK then > > begin > > s := frm.SelectedChars; > > edPassword.Text := s; > > end; > > finally > > frm.Free; > > end; > > end; > > --------------------------------------- > > > If you are doing this on newer UNIX, note that that uses UTF-8 encoding > where a single character can span 1..infinite bytes. > > So your SelectedChars should be a TStringList instead :) > > Please tell more info about the environment... > > cheers, > Danny > > > _________________________________________________________________ > To unsubscribe: mail [EMAIL PROTECTED] with > "unsubscribe" as the Subject > archives at http://www.lazarus.freepascal.org/mailarchives > -- There's no place like 127.0.0.1 _________________________________________________________________ To unsubscribe: mail [EMAIL PROTECTED] with "unsubscribe" as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
