Casa
Top.Mail.Ru Yandeks.Metrika
Foro: "Principal";
Archivo actual: 2002.01.08;
Descargar: [xml.tar.bz2];

abajo

Imprimir texto desde Memo! Tengo algo mal ... Encontrar ramas similares


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

Вот таким годом я пытаюсь вывест текст из MEMO на принтер:
si PrintDialog1.Execute entonces
Memo.Print("");
Que es lo que esta mal



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

Var St : TextFile ; I : integer ;
comenzar
if Print.Execute then
begin
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) ;
fin
fin;



Páginas: 1 rama entera

Foro: "Principal";
Archivo actual: 2002.01.08;
Descargar: [xml.tar.bz2];

arriba









Memoria: 0.81 MB
Tiempo: 0.114 c
1-22143
[NWC] Eminem
2001-12-20 12:04
2002.01.08
.dcu


3-21994
Vs
2001-12-06 16:23
2002.01.08
Matriz dinámica


4-22482
Poni
2001-11-01 10:06
2002.01.08
WinExec o ShellExecute


4-22476
reino
2001-11-02 19:42
2002.01.08
Ayuda, UpdateResource no funciona con archivos BPL!


1-22085
ProfiUgl
2001-12-19 15:24
2002.01.08
Cómo leer las opciones de la línea de comandos.





africaans albanés Arabic armenio Azerbaiyán vasco Bielorruso Bulgarian Catalán Chino (simplificado) Chino (tradicional) Croata Checo Danés Dutch Inglés Estonia filipina Finnish Francés
gallego georgiano Alemán Griego criollo haitiano hebreo hindi Húngaro islandés Indonesian irlandés Italiana Japonés Korean letón lituano macedonio Malay maltés Noruego
persa polaco Portuguese rumano Ruso Serbio Slovak Esloveno Español swahili Sueco Thai turco ucranio Urdu vietnamita galés yídish bengalí bosnio
cebuano esperanto gujarati hausa hmong igbo javanés kannada khmer lao latín maorí marathi mongol nepali punjabi somalí Tamil telugu yoruba
zulú
Английский Francés Alemán Italiano portugués Русский Español