Текущий архив: 2003.03.03;
Скачать: CL | DM;
Вниз
КАК ПЕЧАТАТЬ TMEMO? Найти похожие ветки
← →
Ahmad K (2003-02-18 23:52) [0]и все...
← →
jack128 © (2003-02-19 00:29) [1]простейший вариант - использовать AssignPrn(...)
и писать как в ткстовый файл...
← →
Ahmad K (2003-02-19 18:39) [2]А как именно исходника нету?
← →
jack128 © (2003-02-19 21:41) [3]procedure TForm1.Button1Click(Sender: TObject);
var
MyFile: TextFile;
i : integer;
begin
AssignPrn(MyFile);
Rewrite(MyFile);
for i := 0 to Memo1.lines.Count - 1 do
Writeln(MyFile, Memo1.Lines[i]);
System.CloseFile(MyFile);
end;
← →
jack128 © (2003-02-19 21:46) [4]Больше всего люблю копировать хелп на этот сайт :-)
← →
Pat © (2003-02-19 23:32) [5]>Ahmad K (18.02.03 23:52)
RichEdit не подойдет? :)
Страницы: 1 вся ветка
Текущий архив: 2003.03.03;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.024 c
