![]() |
|
|
|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#1
|
|||
|
|||
|
Есть файл 12.тхт. В нём 3 строки. Содержимое 1 строки должн опопасть в Едит1, содержимое 2 в Мемо1, а содержимое 3 это путь до картинки, которая должна отображатся. Получить всё содержимое файла 12.тхт в тотже Мемо1 мне удалось.
Код:
Memo1.Lines.LoadFromFile('C:\12.txt')Помогите пожалуйста |
|
#2
|
|||
|
|||
|
Код:
var
SL : TStringList;
begin
SL := TStringList.Create
Try
SL.LoadFromFile('C:\12.txt');
Edit1.Text := SL[1];
Memo1.Lines.Text := SL[2];
Image1.Picture.LoadFromFile(SL[3]);
Finally
SL.Free;
End;
end;Здесь нет проверки содержимого файла (то, что там действительно есть 3 строки) и наличия файла с картинкой на диске, на который указывает 3я строка. |
|
#3
|
|||
|
|||
|
cпасибо огромное! Удалось получить содержимое из строки в мемо1. Но дел ов том чо там текст около 15 предлодений. Он естественно их всех в одну строчку написал. Как мне сделать чтобы после определённого количества символов шёл автоматический перенос строки?(перенос уже при выдавании текста в мемо а не в файле.В файле должно быт ьвсегда только 3 строчки. На 2 этот текст длинной почти 300 символов. А хотелось чтобы примерно через каждые 50 символов переходило на следующую строку(#13))
|