Скачать: CL | DM;

Как работать с Editbox ом   Найти похожие ветки 

← →
Kirill ©   (2002-08-11 23:52) [0]

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

---

← →
Igit ©   (2002-08-12 05:38) [1]

Не знаю как в ЕдитБокс"е, а в РичЕдит"е так:
Колво строк - 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 - формат текста:


вот так:)

---

← →
Gandalf   (2002-08-12 08:58) [2]

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

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

---

← →
Kirill ©   (2002-08-12 17:16) [3]

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

---

← →
Vladimir Kladov   (2002-08-13 12:11) [4]

Через TStrList.

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

---

← →
Kirill ©   (2002-08-15 22:08) [5]

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

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.009 c