FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour sugerencia para FWSTRING
Posts: 1956
Joined: Fri Oct 07, 2005 07:08 PM
sugerencia para FWSTRING
Posted: Fri Aug 04, 2023 06:34 PM
Antonio, agregue estas lineas en mi version no esta pero si pueden agregarlas para proximas atualizaciones o si pueden mejorar mi codigo mejor.

gracias
Code (fw): Select all Collapse
   if FWLanguageID() == 1
      return cString
   endif
 
   // esto agregue. el 388 puse porque es la ultima linea por defecto que trae aStrings

   IF (ValType(cString) == 'N')
      cRet:= aStrings[388 + cString][nLanguage]
      RETURN cRet
   ENDIF

   cSeek    := Upper( AllTrim( cString ) )
FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: sugerencia para FWSTRING
Posted: Sat Aug 05, 2023 03:12 PM

Estimado Gustavo,

Lo que quieres es buscar una cadena pero usando un número, su índice ?

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 1956
Joined: Fri Oct 07, 2005 07:08 PM
Re: sugerencia para FWSTRING
Posted: Sun Aug 06, 2023 06:28 AM
Exacto,
Hice ese cambio y en mi caso está funcionando. porque vi lo util que era la función fwstring y ya comence a utilizarlo no solo en frases cortas sino en explicaciones largas, entonces me resultó mas util referirme al indice que ocupa en aTranslate que no una frase.

fwstring(1)
en vez de:
fwstring('ajs dajsk dalksd alksjd aklsdj alksdj lkasdj alksdjalkdsja lkdjakld akdjald')
FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/

Continue the discussion