Показать сообщение отдельно
  #5  
Старый 04.11.2011, 05:35
Аватар для Amilman
Amilman Amilman вне форума
Новичок
 
Регистрация: 27.03.2011
Адрес: г.Кемерово
Сообщения: 98
Версия Delphi: XE
Репутация: 10
По умолчанию

Спасибо большое. Сделал вот так.
Код:
Edit2.Text:= Edit_fio.Text + '.' + String(Edit_name.Text)[1] + '.' + String(Edit_otch.Text)[1];

А потом из Edit2.text заношу данные в табицу из базы.
Ответить с цитированием