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

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


procedure TForm1.ComboBox1KeyDown(SenderTObject; var KeyWord;
  
ShiftTShiftState);
begin
  
if Key=VK_RETURN then
    ComboBox1
.Items.Add(ComboBox1.Text);
end;

procedure TForm1.FormClose(SenderTObject; var ActionTCloseAction);
begin
  ComboBox1
.Items.SaveToFile(history);
end;

procedure TForm1.FormShow(SenderTObject);
begin
  
if FileExists(historythen
    ComboBox1
.Items.LoadFromFile(history);
end
Спасиб. Буду пробовать.
Ответить с цитированием