Suma StrToInt para Edit vacios

[cocke]

Hola a todos..
Despues de leerlos atte, corregi todo lo aconsejado y aun no funcionaba..
Pueden creer que el error estaba dentro del if,habia olvidado la diferencia entre un = y un ==
Gracias por todo..
Estuve leyendo acerca de TPrinter, ya que necesito imprimir el formulario, y encontre lo siguiente
TPrinter Prntr = Printer();
TRect r = Rect(200,200,Prntr->PageWidth – 200,Prntr->PageHeight – 200);
Prntr->BeginDoc();
Prntr->Canvas->TextRect(r, 200, 200, Memo1->Lines->Text);
Prntr->EndDoc();
Pero creo que esta imprimiendo un cuadrado?
Se supone que para imprimir le formulario primero debo capturar el mapa de bits del formulario, y nose como hacerlo

Me podrian ayudar a imprimir el formulario??
Gracias nuevamente

Saludos!!

[[Crandel]]

Hola de nuevo, es importante que mantengamos cierto orden en el foro, porque la cantidad de mensajes es enorme, por lo que para tema nuevo, abri un nuevo hilo.

Igualmente te recomiendo que leas La guia de estilo que ayudan bastante al escribir los mensajes y obtener mejor respuesta.