Como copiar las tres primeras letras

Hola
Lo que necesito en saber como copiar las primera tres letras de un dbedit a otro
Lo que me pasa es que estoy realizando un proyecto en la universidad y deseo que el campo matricula contenga las tres primeras letras de del nombre del estudiante.
Gracia de antemano
1

1 Respuesta

2.800 pts. Manejo de SQL, Llaves de Registro, archivos INI,...
Utiliza las Fusiones RightStr o alguna de estas
function RightStr
    (Const Str: String; Size: Word): String;
begin
  if Size > Length(Str) then Size := Length(Str) ;
  RightStr := Copy(Str, Length(Str)-Size+1, Size)
end;
function MidStr
    (Const Str: String; From, Size: Word): String;
begin
  MidStr := Copy(Str, From, Size)
end;
function LeftStr
    (Const Str: String; Size: Word): String;
begin
  LeftStr := Copy(Str, 1, Size)
end;
La manera de llamarlas es la siguiente
Dato:=rightstr(dbedit1.text, 3); y asi cada una de ellas

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas