Cita:
Empezado por ZayDun
acabo de probar el codigo y me da error..
" No declarado el identificador ExtractNumber" :S
|
ExtractNumber() es una función que no viene en las VCL pero como su nombre indica se supone que extrae el número de la imagen.
Parece ser que las numeras: Image1, Image2, ...., Image200 ó algo por el estilo pues hay muchas maneras de extraer esos dígitos -1, 2, ..., 200- de Image. Por ejemplo:
Código Delphi
[-]
function ExtractNumber(const aImageSt: string): Integer;
begin
Result := IntToStr(Copy(aImageSt, 6, Length(aImageSt)));
end;
Saludos