![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
как распечатать memo ? [D7]
@gent © (2006-03-12 17:39:00)Я не могу распечатать то что у меня находиться в компоненте memo.
var
To_Prn : TextFile;
begin
AssignPrn(To_Prn);
Rewrite(To_Prn);
Writeln(To_Prn, Memo6.lines);-и вот тут ругается !
CloseFile(To_Prn);
end;
А вот ошибка - ([Ошибка] Unit2.pas(136): Illegal type in Write/Writeln statement).
Что он от меня хочет ?
Desdechado (2006-03-12 18:15:00) [1]хочет СТРОКУ, а ты его кормишь списком строк
Ega23 (2006-03-12 17:54:00) [2]
var
To_Prn : TextFile;
i : Integer;
begin
AssignPrn(To_Prn);
Rewrite(To_Prn);
for i:=0 to Memo6.lines.Count-1 do
Writeln(To_Prn, Memo6.lines[i]);-и вот тут ругается !
CloseFile(To_Prn);
end;