Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

ListBox1 и Memo1 [D7, WinXP]

sashafan © (2007-01-05 13:45:00)
В проге два элемента ListBox1 и Memo1. Прога работает по такому
способу. В ручную через Items вводишь нужные строки, она в папке
data\files\ создаёт файлы *dll с такими же названиями. Вот код

procedure TForm1.ListBox1Click(Sender: TObject);
var
homeDir: string;
begin
try
memo1.Clear;
homeDir := ExtractFileDir(application.ExeName)+'\data\files\';
memo1.Lines.LoadFromFile(homeDir+ListBox1.Items[ListBox1.ItemIndex]+'.dll');
except
Application.MessageBox('Файл повреждён или не найден!','Ошибка загрузки файла')
end;
end;

Это не удобно мне бы хочется, чтобы пользователь сам мог добавить. Как
сделать так, чтобы в поле ListBox1 загружался текст из файла text.txt,
находящийся в папке data\text\.

И ещё заодно вопрос (отдельный). Как в файл text.txt можно добавить
строчку при нажатии на button1, чтобы она отобразилась в поле
ListBox1. Строчка будет вводится в поле edit1.

antonn (2007-01-05 14:12:00) [1]
sashafan © (05.01.07 13:45)
И ещё заодно вопрос (отдельный). Как в файл text.txt можно добавить
строчку при нажатии на button1, чтобы она отобразилась в поле
ListBox1. Строчка будет вводится в поле edit1.
listbox1.items.add(edit1.text);

Anatoly Podgoretsky (2007-01-05 13:50:00) [2]
> sashafan (05.01.2007 13:45:00) [0]

ListBox.Items.LoadFromFile

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »