sugerencia para FWSTRING

sugerencia para FWSTRING

Postby goosfancito » Fri Aug 04, 2023 6: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: Select all  Expand view  RUN
  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/
User avatar
goosfancito
 
Posts: 1954
Joined: Fri Oct 07, 2005 7:08 pm

Re: sugerencia para FWSTRING

Postby Antonio Linares » Sat Aug 05, 2023 3: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
User avatar
Antonio Linares
Site Admin
 
Posts: 42203
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Re: sugerencia para FWSTRING

Postby goosfancito » Sun Aug 06, 2023 6: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/
User avatar
goosfancito
 
Posts: 1954
Joined: Fri Oct 07, 2005 7:08 pm


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 95 guests