FAVOR AYUDA URGENTE CON UN BROWSER

FAVOR AYUDA URGENTE CON UN BROWSER

Postby Miguel Rivera » Wed Feb 28, 2007 9:55 pm

Hola Amigos:

Les pido disculpas por usar este foro para hacer una pregunta de FW 2.4, pero estoy super complicado.


Como puedo manejar el Browser (Tcbrowse) como un arreglo que cargare con datos de una DBF, siempre el manejado los campos de la dbf directo en el BROWSER, pero es urgente hacer el browser con arreglo.

USE FW 2.4, CLIPPER 5.3 y BLINKER 7.0.

Saludos,
Miguel

ESTE ES EL CODIGO PARA MANEJAR BASE DBF

Redefine Browse oLbx1 Id 110 Of oDialogo Grid;
On DblClick (Mues_cot(),oLbx1:Refresh(), oLbx1:SetFocus())
oLbx1:oFont := TFont():New( "MS Sans Serif", 0, -15,, .T. )
oLbx1:nFreeze := 1
oLbx1:nClrBackFocus := RGB(48,207,100)
oLbx1:bKeyChar := {| nKey, nFlags | iIf(nKey == 13,Mues_cot(),)}
Add Column To Browse oLbx1 Data edificio->nom_edi;
Head "Edificio" Width 270 Tag "Edificio"
Add Column To Browse oLbx1 Data spac(3)+oDbdep->Cod_dep;
Head "Departa" Width 70 Tag "Departamento"
Add Column To Browse oLbx1 Data Oridep->Det_ori;
Head "Orientación Dpto." Width 160 Tag "Orientación Dpto."
Add Column To Browse oLbx1 Data Tipodep->Can_dor;
Head "Dormi." Width 70 Tag "Dormi."
Add Column To Browse oLbx1 Data Tipodep->Can_ban;
Head "Baños" Width 70 Tag "Baños"
Add Column To Browse oLbx1 Data oDbdep->Cos_dep;
Head "Costo" Width 80 Tag "Costo"

Define Column oCol Head "" Size 1
oLbx1:AddColumn(oCol)
Miguel Rivera
 
Posts: 117
Joined: Sun Oct 01, 2006 11:39 pm

Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: Enrico Maria Giordano, Jorge Jaurena, JoseAlvarez and 11 guests