| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Как работать с Editbox ом

Kirill ©   (2002-08-11 23:52:00) 

Как работать с Editbox"ом (многострочный) - имеется ввиду быстрое сохранение в файл, чтение из файла, сколько строк и т.п. В примере №3 плохо описана работа с ним.

---

Kirill   (2002-08-15 22:08:00) [1]

За то время, что меня не было в сети точно так и придумал делать.

---

Vladimir Kladov   (2002-08-13 12:11:00) [2]

Через TStrList.

чтение:
SL := NewStrList;
SL.LoadFromFile( ... );
Memo1.Text := SL.Text;
SL.Free;

---

Kirill   (2002-08-12 17:16:00) [3]

2Gandalf:
> А чем Memo не угодил?
Например тем, что он в MCK, а я работаю с KOL. Мне интересно именно для KOL"а.

---

Gandalf   (2002-08-12 08:58:00) [4]

А чем Memo не угодил?
procedure TForm1.Button1Click(Sender: PObj);
var SL: PStrList;
begin
SL := NewStrList;
SL.LoadFromFile( "tst.txt" );
Memo1.Text := SL.Text;
SL.Free;
end;
Быстрее я не умею.

Программирование - это игра в кубики... Главное, знать, что из кубиков
можно построить домики :)

---

Igit   (2002-08-12 05:38:00) [5]

Не знаю как в ЕдитБокс"е, а в РичЕдит"е так:
Колво строк - RichEdot1.Count (Ну это должно быть везде, стандарт)

Чтобы загрузить текст используйте функцию:
function RE_LoadFromFile( const Filename: String; Format: TRETextFormat; SelectionOnly: Boolean ): Boolean;

Сохранить:
function RE_SaveToFile( const Filename: String; Format: TRETextFormat; SelectionOnly: Boolean ): Boolean;

Filename - путь до файла
Format - формат текста:


вот так:)

---

Наверх