![]() |
|
|
|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
|
|
#1
|
|||
|
|||
|
Здравствуйте. Буду очень благодарен за помощь в одной не большой проблемке. Допустим есть поле edit1, я записываю туда какой либо текст (Напр. "Привет Василий"). Нужно чтобы этот текст сохранился, и при следующем запуске программы вводя этот текст в поле edit1 с первой же буквы мне выдался вариант "Привет Василий".
т.е я ввожу букву П и мне выдается предложение ввести этот текст.... Подобно Google ( когда начинаешь вводить какое ниб слово мне на выбор выплывает множество предложений слов) |
|
#2
|
|||
|
|||
|
Я бы вместо Edit взял ComboBox, т.к. он как раз и выдаёт подсказки. Итак, берём ComboBox и очищаем свойство Text (или в FormCreate можно написать Combobox1.Text:= ''; )
Код:
const
myFile: string = '1.txt';
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
ComboBox1.Items.Add(ComboBox1.Text);
ComboBox1.Items.SaveToFile(
ExtractFilePath(Application.ExeName) + myFile);
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
if FileExists(myFile) then
ComboBox1.Items.LoadFromFile(myFile);
end; |
|
#3
|
|||
|
|||
|
Спасибо) только Не могу понять FormClose?
|
|
#4
|
||||
|
||||
|
Событие формы OnClose, выбирается и назначается в Object Inspector-е.
|
|
#5
|
|||
|
|||
|
ясно. Благодарю.
![]() |