como crear un formulario con controles label y textbox por program

02/08/2006 - 05:18 por Jesus Moreno | Informe spam
como puedo crear un formulario por medio de un programa y dentro del
formulario insertar controles label y textbox, las posiciones de los label y
los textbox son variables dependiendo de una planilla previamente definida.

De antemano gracias por su ayuda.

Preguntas similare

Leer las respuestas

#6 Franklin Maza
15/08/2006 - 20:58 | Informe spam
Podras enlazarlos con las propiedad Control Source del control.

"integral" escribió en el mensaje
news:
Que tal amigos :
Me parece muy bueno el ejemplo del experimentado colega Luis Maria
ahora bien aqui mi consulta tomando la idea creada. Es posible enlazar
el formulario creado con datos de una Tabla de ser asi como seria el
ejemplo. Para mi esto es algo nuevo de crear formularios por codigo.

Cuando programaba en Foxpro para D.O.S. 2.6. por ejemplo para
presentaciones preliminares de Facturas utilizaba el practico SET
FORMAT TO y dentro de el el @ SAY. enlazado a datos de una o mas tablas
y funcionaba bien y daba una presentacion casi identica a la impresion.

Bueno amigos espero sus comentarios.

Saludos,
GABRIEL

Jesus Moreno ha escrito:

perfectisimo, es justo lo que necesitaba, eres muy amable te lo agradesco
mucho.

Saludos.

"Luis María Guayán" wrote:

> Un Formulario de ejemplo para ello:
>
> PUBLIC goForm
> goForm = CREATEOBJECT("Form")
> FOR ln = 1 TO 10
> goForm.ADDOBJECT("Label"+TRANSFORM(ln),"Label")
> goForm.ADDOBJECT("Text"+TRANSFORM(ln),"TextBox")
> WITH EVALUATE("goForm.Label"+TRANSFORM(ln))
> .CAPTION = "Label "+TRANSFORM(ln)
> .TOP = 20 * ln
> .LEFT = 10
> .AUTOSIZE = .T.
> .VISIBLE = .T.
> ENDWITH
> WITH EVALUATE("goForm.Text"+TRANSFORM(ln))
> .TOP = 20 * ln
> .LEFT = 100
> .VISIBLE = .T.
> ENDWITH
> ENDFOR
> goForm.SHOW(1)
>
>
> Luis María Guayán
> Tucumán, Argentina
> ________________________________
> SysOp de www.PortalFox.com
> Microsoft Visual FoxPro MVP
> ________________________________
> La palabra imposible solo figura
> en el diccionario de los tontos
>
> "Jesus Moreno" escribió en el
> mensaje news:
> > ya estuve viendo algunos ejemplos en las paginas de portalfox ya
> > entendi
> como
> > hacerlo, el problema es como mencione en principio como puedo poner
> > una
> serie
> > de controles label y textbox de forma variable, digamos un ciclo donde
> > se
> > pongan "n" cantidad de controles y en diferentes posiciones tambien de
> manera
> > variable, yo las posiciones y cantidad de controles los tengo en una
> > tabla
> > guardados, anteriormente yo lo hacia con una serie de "Say" y "Get"
> > para
> > armar la ventana, espero que me explique y me puedan ayudar.
> >
> > Gracias.
> >
> > "Luis María Guayán" wrote:
> >
> > > Creo que un ejemplo será mas gráfico:
> > >
> > > PUBLIC goForm
> > > goForm = CREATEOBJECT("MiForm")
> > > goForm.SHOW
> > >
> > > DEFINE CLASS MiForm AS FORM
> > > AUTOCENTER = .T.
> > > NAME = "MiForm"
> > > CAPTION = "Ejemplo"
> > >
> > > ADD OBJECT MiLabel AS LABEL WITH ;
> > > LEFT = 10, TOP = 10, AUTOSIZE = .T., ;
> > > NAME = "MiLabel", CAPTION = "Código:"
> > >
> > > ADD OBJECT MiText AS TEXTBOX WITH ;
> > > LEFT = 60, TOP = 10, HEIGHT = 25, WIDTH = 100, ;
> > > NAME = "MiText", VALUE = 0
> > > ENDDEFINE
> > >
> > >
> > > Luis María Guayán
> > > Tucumán, Argentina
> > > ________________________________
> > > SysOp de www.PortalFox.com
> > > Microsoft Visual FoxPro MVP
> > > ________________________________
> > > La palabra imposible solo figura
> > > en el diccionario de los tontos
> > >
> > > "Jesus Moreno" escribió en
> > > el
> > > mensaje news:
> > > > como puedo crear un formulario por medio de un programa y dentro
> > > > del
> > > > formulario insertar controles label y textbox, las posiciones de
> > > > los
> label
> > > y
> > > > los textbox son variables dependiendo de una planilla previamente
> > > definida.
> > > >
> > > > De antemano gracias por su ayuda.
> > >
> > >
> > >
>
>
>
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una pregunta AnteriorRespuesta Tengo una respuesta
Search Busqueda sugerida