Extraer el primer caracter de un string

[willy]

Hola a todos
Estoy desarrollando una aplicación en Delphi 7 y me gustaria que alguien me dijese que comandos puedo utilizar para extraer únicamente la primera letra de un string cualquiera. Por ejemplo, si en el string esta almacenada la palabra "hola" me gustaría poder extraer solamente la letra "h" para compararla posteriormente con otra variable.
Si alguien me puede mandar algún ejemplo le estaría muy agradecido.

[delphi.com.ar]

Hay varias formas de hacerlo:

var
  Text: string;
begin
  Text := 'Hola';
  {Por Caracter (Habría que evaluar que la cadena no este vacía)}
  Result := Text[1];
  {Con Copy}
  Result := Copy(Text, 1, 1);
  {Con LeftStr - Sólo válido de Delphi 6 en adelante}
  Result := LeftStr(Text, 1)
  ...

Saludos!

[Isaac]

Yo siempre lo hago así.

[delphi.com.ar]

Empezado por Isaac

Yo siempre lo hago así.

Pues... me parece que te falto algo

[Isaac]

Ay, sí. Me refería a que para extraer los caracteres de una cadena de texto siempre lo trato como un array, que al fin al cabo, una cadena de texto es un array de caracteres

[[Al González]]

¡Hola a todos!

En algunos casos, cuando es seguro que la cadena tenga por lo menos un carácter, utilizo la expresión Cadena [1], pero si existe la posibilidad de que esté vacía, empleo la expresión CaracCade (Cadena), función de Interfaz GH que devuelve #0 en caso de que la cadena esté vacía.

Saludos.

Al González .