Показать сообщение отдельно
  #1  
Старый 07.05.2007, 22:47
Аватар для X-rem
X-rem X-rem вне форума
Начинающий
 
Регистрация: 06.04.2007
Адрес: Питер
Сообщения: 119
Репутация: 10
Печаль Как узнать букву

Короче есть Edit1 В нем нужны последние 3 буквы.

var
l1,l2,l3 : Char
psh : String

psh - Это расщинение
psh:='.'+l1+l2+l3
SaveDialog1.FileName='File'+psh;

Вопрос такой
Как записать в l1,l2 и в l3 букву.
Ну я делаю так:
l1:=Length(Form1.Edit1.Text);
Он мне даёт цифру. А мне нужна буква. Подскажите как это сделать .
А то память изменила )
__________________
[ Ты не сможешь никому помочь до тех пор, пока не поможешь себе ]
Delphi 7 user
  • Indy 10.5.5
  • AbfEffects & Controls
  • LockBox
  • AlphaControls
  • Eagle CDK

ICQ: 570224849 / JID: x-rem@jabber.ru|no / Skype: ukc-rem / VK: ukc_rem.vk.com (ID: 27703738)
Ответить с цитированием