Cita:
Empezado por feliz-58
Saludos, Consulta rápida....
imaginemos que tengo dentro de un edit lo siguiente:
//ClubDelphi
a manera de If...Then...Else como puedo definir que si en el edit los dos primeros espacios son exactamente esos dos símbolos // por ejemplo me muestre un mensaje diciendo Hola y que de lo contrario diga Adiós.
...
|
Hola, respuesta rápida
Código Delphi
[-]
function foo(const s: string): string;
begin
if (s[1] = '/')and(s[2] = '/') then
Result := 'Hola'
else
Result := 'Adios';
end;
O también:
Código Delphi
[-]
function foo(const s: string): string;
const
MSG: array[Boolean] of string = ('Adios','Hola');
begin
Result := MSG[(s[1] = '/')and(s[2] = '/')];
end;
Uso:
Código Delphi
[-]
ShowMessage(foo('//ClubDelphi'));
Saludos