Función para comprar dos strings

[ecfisa]

lo único que necesito es que me digo si son o no iguales.

Hola Jere_84.

Entonces, otra posibilidad es utilizar cualquiera de las funciones StrCompare o AnsiStrCompare, estas devuelven un valor que según la propia ayuda de Delphi es:

Condition  Return Value
S1 > S2	   > 0
S1 < S2    < 0
S1 = S2	   = 0

Ahora podrías hacer:

Código Delphi [-]
 if Boolean(CompareStr('Hola', 'Hola')) then // True si son <>
    ShowMessage('Diferentes')
  else
    ShowMessage('Iguales');

Saludos.

[[Delphius]]

Pues... no conozco si existe una función para comprar strings. Es la primera vez que "escucho" que se tenga que pagar por usarlos

Ahora yendo a tu pregunta: Define para ti que dos strings sean iguales... porque a mi me huele a que te estás complicando al puro %$#&@. Define realmente que es "compararlos"
En principio para algo tan trivial y básico ¿Hace falta una función? ¿Que o quien te impide hacer algo como:

Código Delphi [-]
if String1 = String2
   then ShowMessage('Son Iguales macho. ¿Que no ves?')
   else ShowMessage('Pues resulta que somos distintos. Y no hizo falta de más para compararnos')

;

Digo... o es que yo me volví más tarado, que puede ser y no descarto , o es que tu esperas algo más de una "comparación". A ver si te explicas porque...

Saludos,

[cloayza]

Bueno en delphi xe existen varias funciones para realizar lo que requieres...

Unit: SysUtils.Pas

• SameStr
• SameText
• CompareStr
• CompareText
• AnsiCompareStr
• AnsiCompareText
• CompareMem

Cada una con sus características.

En la unit StrUtils.Pas, existen mas funciones la cosa sería buscar...

Saludos cordiales


Saludos

[Jere_84]

Empezado por cloayza

Bueno en delphi xe existen varias funciones para realizar lo que requieres...

Unit: SysUtils.Pas

• SameStr
• SameText
• CompareStr
• CompareText
• AnsiCompareStr
• AnsiCompareText
• CompareMem

Cada una con sus características.

En la unit StrUtils.Pas, existen mas funciones la cosa sería buscar...

Saludos cordiales


Saludos

Muchas Gracias, me quede con: SameText

Slds.