Hola a todos.
Pues lo dicho, 驴c贸mo puedo escribir en la pantalla principal de mi programa? Es una ventana MDI en la que hasta ahora mostraba un bitmap, pero quisiera mostrar los datos de la empresa, los cuales tengo en un archivo. Se que debe haber alg煤n ejemplo en SAMPLES, pero como que no doy con 茅l.
Gracias por adelantado y un saludo.
Fernando Morales del Rosario
Hola Fernando,,,
Yo hago asi:
DEFINE WINDOW oWPpal MDI ........
...
...
ACTIVATE WINDOW oWPpal MAXIMIZED ;
ON INIT ResumCtas(oWPpal).....
...
..
Function ResumCtas(oWPpal)
local oSay, vSay
vSay := ""
If ChequePendiente()
vSay := vSay + "Existen Cheques Girados a Pagar Hoy D铆a" + CRLF EndIf
If CtasPorCobrar()
vSay := vSay + "Existen Cr茅ditos por Cobrar Hoy D铆a" + CRLF
EndIf
If CtasPorPagar()
vSay := vSay + "Existen Cuentas por Cobrar Hoy D铆a" + CRLF
EndIf
If !Empty(vSay)
@ 90, 30 SENSITIVE SAY vSay SIZE 375,28 PIXEL OF oWPPal;
COLOR CLR_BLUE COLOROVER CLR_HBLUE;
TRANSPARENT
EndIf
Return(Nil)
....
...
Espero te sirva el ejemplito..
Salu2
Willi Quintana
