Search found 3872 matches: endif

Return to advanced search

Re: Hide/show search system on a dialog - Resolved

... oBrw:nHeight:= oBar:ntop-40 else oSay[1]:hide() oSay[2]:hide() oGet:hide() oBrw:oSortCbx:hide() oBrw:nTop:=2 oBrw:nHeight:= oBar:ntop-40 Endif for n=1 to Len(aBtn) aBtn[n]:ntop:= oBar:ntop-40 aBtn[n]:refresh() next return nil
by Silvio.Falconi
Mon Mar 25, 2024 11:57 am
 
Forum: FiveWin for Harbour/xHarbour
Topic: Hide/show search system on a dialog - Resolved
Replies: 6
Views: 239

Cambios en diálogos.

... Viendo en el foro la sugerencia de ANTONIO fue usar SKIN. al compilar el ejemplo con buildh. bat me da este error. Error prsht.h 1081 1: '#endif' before '#if' Probé usando las mismas sentencias en mi prg y no logro ver ningún cambio. Se debe definir algo diferente en el WORKSHOP? segunda ...
by José Camilo
Sun Mar 24, 2024 3:43 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Cambios en diálogos.
Replies: 3
Views: 93

Re: Question about performance RowSet

... ) if aRow == NIL // not found, then inserts aRow := { "aa","bb" } oCn:Upsert( "states", nil, { aRow } ) endif But insert not work. Table `states` has 3 fields: id, code, name where id is autoincrement field This should work: oCn:Upsert( "states", ...
by nageswaragunupudi
Wed Mar 20, 2024 3:19 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: Question about performance RowSet
Replies: 19
Views: 471

Re: Another for Btnbmp

... if oBtn:lMOver clr := {{ 1, RGB( 250,250,245),RGB( 250,250,245) }} elseif oBtn:lPressed clr := RGB( 180,136,85 ) else clr := RGB( 245,245,235) endif endif return clr > obtn[n]:nClrBorder := RGB(195,195,185) obtn[n]:oCursor:= oCursorBtn next Is it possible that it can't be removed or changed ...
by Silvio.Falconi
Wed Mar 20, 2024 11:37 am
 
Forum: FiveWin for Harbour/xHarbour
Topic: Another for Btnbmp
Replies: 26
Views: 611

Re: Pasando a FWH24.02+Harbour+BCC77

... not found - path ignored in option '-I' (esa ruta no está en bcc77 ) al compilar rcimport.rc -> Error prsht.h 918 9: '#endif' before '#if' / Warning W8123: Path 'c:\bcc7\include\windows\rtl' not found - path ignored in option '-I' (esa ruta no está en bcc77 ) Tu logras ...
by jose_murugosa
Mon Mar 18, 2024 1:56 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Pasando a FWH24.02+Harbour+BCC77
Replies: 12
Views: 366

Re: Pasando a FWH24.02+Harbour+BCC77

... y nos conectamos cuando tu puedas. Ahora tengo todo casi resuelto, mi único problema es el prsht.h, que me da el error de un if sin endif, pero lo estoy revisando ahora. Gracias por tu gran disposición, si resuelvo eso escribo por acá.
by jose_murugosa
Mon Mar 18, 2024 1:54 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Pasando a FWH24.02+Harbour+BCC77
Replies: 12
Views: 366

Re: Pasando a FWH24.02+Harbour+BCC77

... not found - path ignored in option '-I' (esa ruta no está en bcc77 ) al compilar rcimport.rc -> Error prsht.h 918 9: '#endif' before '#if' / Warning W8123: Path 'c:\bcc7\include\windows\rtl' not found - path ignored in option '-I' (esa ruta no está en bcc77 ) Tu logras ...
by Enrico Maria Giordano
Fri Mar 15, 2024 6:29 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Pasando a FWH24.02+Harbour+BCC77
Replies: 12
Views: 366

Re: Pasando a FWH24.02+Harbour+BCC77

... not found - path ignored in option '-I' (esa ruta no está en bcc77 ) al compilar rcimport.rc -> Error prsht.h 918 9: '#endif' before '#if' / Warning W8123: Path 'c:\bcc7\include\windows\rtl' not found - path ignored in option '-I' (esa ruta no está en bcc77 ) Tu logras ...
by jose_murugosa
Fri Mar 15, 2024 3:51 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Pasando a FWH24.02+Harbour+BCC77
Replies: 12
Views: 366

Problemas con comportamiento de XBrowse.

... function veo(nApu,oLbx,aAcciones,nKey) nApu:=ascan(aAcciones,{|x|IF(LEN(X)>4,x[5]==nKey,.F.)}) if empty(nApu) return .f. else return .t. endif *------------------------------------------------------------------------------------ Gracias
by José Camilo
Fri Mar 15, 2024 2:11 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Problemas con comportamiento de XBrowse.
Replies: 1
Views: 110

Pasando a FWH24.02+Harbour+BCC77

... not found - path ignored in option '-I' (esa ruta no está en bcc77 ) al compilar rcimport.rc -> Error prsht.h 918 9: '#endif' before '#if' / Warning W8123: Path 'c:\bcc7\include\windows\rtl' not found - path ignored in option '-I' (esa ruta no está en bcc77 ) 1) Debemos ...
by jose_murugosa
Wed Mar 13, 2024 4:15 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Pasando a FWH24.02+Harbour+BCC77
Replies: 12
Views: 366

Problemas para pasarme a FWH24.02 con BCC77

... not found - path ignored in option '-I' (esa ruta no está en bcc77 ) al compilar rcimport.rc -> Error prsht.h 918 9: '#endif' before '#if' / Warning W8123: Path 'c:\bcc7\include\windows\rtl' not found - path ignored in option '-I' (esa ruta no está en bcc77 ) 1) Debemos ...
by jose_murugosa
Wed Mar 13, 2024 4:05 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: Problemas para pasarme a FWH24.02 con BCC77
Replies: 4
Views: 153

Problemita al compilar con FWH24.02

... Borland Resource Compiler Version 5.40 Copyright (c) 1990, 1999 Inprise Corporation. All rights reserved. Error prsht.h 918 9: '#endif' before '#if' Turbo Incremental Link 6.97 Copyright (c) 1997-2022 Embarcadero Technologies, Inc. Fatal: Unable to open file 'ODBC32.LIB' Link ...
by jose_murugosa
Mon Mar 11, 2024 5:05 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Problemita al compilar con FWH24.02
Replies: 4
Views: 149

Re: FWH 24.02 y Harbour con BCC7.7

... funciona, pero el caso es que en esta no: If Select( ::cName ) > 0 DbSelectArea( 0 ) --->>> MsgInfo( Select(), "Hola" ) EndIf ¿Cómo funcionan DbSelectArea() y Select()? " DBSELECTAREA() hace que el área de trabajo especificada se convierta en el área de trabajo actual. ...
by FiveWiDi
Tue Mar 05, 2024 6:17 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: FWH 24.02 y Harbour con BCC7.7 y Select()
Replies: 19
Views: 404

Re: Parpadeo de un SAY

... = .t. oCancelar:lTransparent = .t. ACTIVATE DIALOG oDlgMa CENTERED if lSave if agrega Materia->(DbAppend()) Materia->Codigo := nCodigo endif Materia->Detalle := cDetalle Materia->Abrevia := cAbrevia Materia->Ramo := nRamo Materia->Costo := nCosto Materia->Unidad := cUnidad ...
by José Camilo
Sat Mar 02, 2024 10:30 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Parpadeo de un SAY
Replies: 18
Views: 429

Re: Redondear un Numero

Gracias armando, quedo muy bien..
FUNCTION Redondear(nValor)
IF nValor % 10 <= 5
nValor := nValor - (nValor % 10)
ELSE
nValor := nValor + (10 - nValor % 10)
ENDIF
RETURN(Round(nValor,0))

saludos
by jbrita
Thu Feb 08, 2024 2:42 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Redondear un Numero
Replies: 7
Views: 303
Next

Return to advanced search