Показать сообщение отдельно
  #6  
Старый 16.05.2012, 10:27
gamezeldol gamezeldol вне форума
Прохожий
 
Регистрация: 21.02.2012
Сообщения: 16
Репутация: 10
По умолчанию

Цитата:
Сообщение от Pyro
простейший вариант при помощи combobox:
запоминает при нажатии enter, сохраняет в файл при закрытии формы
PHP код:
function history: string;
begin
result := ExtractFilePath(Application.ExeName) + 'history.txt';
end;


procedure TForm1.ComboBox1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if Key=VK_RETURN then
ComboBox1.Items.Add(ComboBox1.Text);
end;

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
ComboBox1.Items.SaveToFile(history);
end;

procedure TForm1.FormShow(Sender: TObject);
begin
if FileExists(history) then
ComboBox1.Items.LoadFromFile(history);
end;
Спасибо. получилось
А у Edit нет таких свойств? Или это слишком сложно?
Ответить с цитированием