Casa
Top.Mail.Ru Yandeks.Metrika
Fórum: "Principal";
Arquivo atual: 2002.01.08;
Download: [xml.tar.bz2];

Para baixo

Imprimir texto de Memo! Eu tenho algo errado .... Encontre agências semelhantes


DelphiG   (2001-12-18 01:51) [0]

Вот таким годом я пытаюсь вывест текст из MEMO на принтер:
if PrintDialog1.Execute then
Memo.Print("");
O que está errado?



False_Delirium   (2001-12-18 02:15) [1]

Var St : TextFile ; I : integer ;
começar
if Print.Execute then
começar
AssignPrn(St) ;
Rewrite(St) ;
Printer.Canvas.Font := Memo1.Font ;
For I := 0 to Memo1.Lines.Count-1 do Writeln(St,Memo1.Lines[1]) ;
CloseFile(St) ;
end ;
end;



Страницы: 1 filial inteira

Fórum: "Principal";
Arquivo atual: 2002.01.08;
Download: [xml.tar.bz2];

em cima















Memória: 0.81 MB
Hora: 0.031 c
6-22270
Ajax
2001-09-15 10:15
2002.01.08
У меня тут возникло 3 вопроса про почту.


4-22503
Yura
2001-11-05 20:11
2002.01.08
Digite uma string na janela


14-22403
Burmistroff
2001-11-11 20:13
2002.01.08
Супер справочник по Delphi -2. Ваше мнение, please.


14-22334
Alex_A
2001-11-03 12:14
2002.01.08
GRÁFICOS !!!!!!!!! IMPORTANTE !!!!!!!!!!!!!!!!! HELP !!!!!!!!!!!!!!!!


1-22228
Nazgul
2001-12-15 14:28
2002.01.08
Como fazer?





afrikaans albanês Arabic armênio azerbaijano basco belarusian Bulgarian catalão Chinês simplificado) Chinês tradicional) croata checo dinamarquês Dutch Inglês estoniano filipino Finnish French
Galego georgiano German grego crioulo haitiano hebraico hindi húngaro islandês Indonesian irlandês Italian Japanese Korean letão lituano macedónio Malay maltês Norwegian
persa polonês Portuguese romeno Russian sérvio Slovak esloveno espanhol swahili sueco tailandês turco ucraniano urdu vietnamita galês ídiche bengali bósnio
cebuano esperanto gujarati hausa hmong igbo javanês kannada khmer lao latino maori marata mongol Nepali punjabi somali tâmil telugu yoruba
zulu
Английский francês Alemão Italiano Португальский russo Espanhol