[GUFA] GRILLA CON FOTOS

Fri, 25 Apr 2014 13:45:13 -0700 

No estoy seguro, pero si a la columna 3 le sacaste el textbox y le agregaste un 
objeto image, me parece que el problema lo tenés cuando querés poner un 
dynamiccurrentcontrol que por un lado no hace falta y por el otro está mal 
porque parece tener la ubicación de la foto.

 

Entendí bien?

 

De: [email protected] [mailto:[email protected]] En nombre de Walter Comito
Enviado el: viernes, 25 de abril de 2014 02:59 p.m.
Para: GUFA List Member
Asunto: [GUFA] GRILLA CON FOTOS

 

Amigos como están.

Tengo un problema que no puedo ver unas fotos en una grilla.

Les dejo el código que uso para ver si me pueden dar una mano.

 

Las fotos estan en una carpeta que se llama foto_articulos.

 

 

WITH thisform.pgf.page2.GRDarticulos

      

      .ColumnCount = 10

      .FontName= "tahoma"

      .FontSize = 11

 

      .column1.header1.Caption="Locker"

      .column2.header1.Caption="Gaveta"

      .column3.header1.Caption="Foto"

      .column4.header1.Caption="OK"

      .column5.header1.Caption="Cantidad"

      .column6.header1.Caption="Rubro"

      .column7.header1.Caption="Material"

      .column8.header1.Caption="Descripcion"

      .column9.header1.Caption="Codigo"

      .column10.header1.Caption="Talle"

 

 

      .column1.width=50

      .column2.width=50

      .column3.width=60

      .column4.width=40

      .column5.width=60

      .column6.width=160

      .column7.width=160

      .column8.width=650

      .column9.width=50

      .column10.width=50

      

      .column1.FontBold = .t.

      .column2.FontBold = .t.

      .column4.FontBold = .t.

 

      .column1.FontSize=12

      .column2.FontSize=12

      .column5.FontSize=18

 

      .column5.InputMask = "99999"

 

      .column1.Alignment = 2

      .column2.Alignment = 2

      .column4.Alignment = 2

      .column5.Alignment = 2

      .column9.Alignment = 2

      .column10.Alignment = 2

 

      .column3.Sparse = .f.

      .column3.RemoveObject("Text1")

      .column3.AddObject("Img1","image")

      .column3.ControlSource = ""

      .column3.Img1.Picture  = "&foto1"

      .column3.DynamicCurrentControl= "&foto1"

      

      .RowHeight = 50

 

      .ReadOnly = .t.

      .column4.ReadOnly = .f.

      .column5.ReadOnly = .f.

ENDWITH

 

 

GRACIAS

 

 

 

Walter Cómito

 Analista de Sistemas

 MP 0397 C.P.C.I.P.C.

 

›  [email protected]

         [email protected]

 

'   +54 351 494.4667

           153.292.707

 

þ www.softram.com.ar <http://www.softram.com.ar/>

Responder a