Ayuda con mi base de modulo.

[carlosprotos]

Empezado por Neftali

Personalmente no he entendido casi nada.
Te vas mucho por las ramas y no concretas en lo que necesitas...

Lo que necesito es una base de address.en mi caso la direccion tiene 8 digitos ejemplo :346FD2D1
pero necesito que trabaje en todos los sistemas , entonces 346FD2D1 = Csh4F5.tmp+6FD2D1.
mi problema seria en que el csh4F4.tmp cambia las ultimas 3 palabras y puede estar como cshADF.tmp,etc cada vez que ingreso al juego. Entonces necesito alguna función para que me genere el cshxxx.tmp actualizado de forma automaticamente sin estar buscandolo y pegando para que me de la base.

Ejemplo:
Modulo = csh5D70.tmp -> base = 655B0000 entonces la direccion seria : 655BD2D1 (csh4F5.tmp+6FD2D1). eso es lo que necesito.

[Casimiro Noteví]

Tampoco lo entiendo.

[orodriguezca]

Después de leer varias veces entiendo que lo que necesitas es el nombre del archivo mas reciente existente en la carpeta "C:\Users\Rodrix\AppData\Local\Temp" con nombre csh???.tmp (??? son los comodines para el nombre del archivo) para colocarlo en la caja de texto Edit1?. Por favor confirma si esto es lo que necesitas.

[carlosprotos]

Empezado por orodriguezca

Después de leer varias veces entiendo que lo que necesitas es el nombre del archivo mas reciente existente en la carpeta "C:\Users\Rodrix\AppData\Local\Temp" con nombre csh???.tmp (??? son los comodines para el nombre del archivo) para colocarlo en la caja de texto Edit1?. Por favor confirma si esto es lo que necesitas.

Exacto! , necesito eso , el cshxxx.tmp actualizado (aunque hay 5 cshxxx.tmp, solo el de fecha y hora en que entre al juego es la que funciona) , quiero que automaticamente me aparesca el actualizado en el edit1 para que me funcione. cshxxx.tmp+$2D4F50 = 9999;

[ecfisa]

Hola carlosprotos.

Tomando en cuenta que el último archivo generado será el que tenga la fecha mas reciente de modificación, creo que podrías adaptar la función mencionada en este enlace: Saber el ultimo archivo de una carpeta :

Código Delphi [-]
function LastModifiedFile(DirName: string): string;
var
  SR: TSearchRec;
  MaxF, aux: TDateTime;
  MaxN: string;
begin
  DirName:= IncludeTrailingPathDelimiter(DirName);
  MaxF:= 1.00002;
  MaxN:= '';
  if FindFirst(DirName + 'csh*.tmp', faArchive, SR) = 0 then
  begin
    repeat
      aux := FileDateToDatetime(SR.Time);
      if aux > MaxF then
      begin
        MaxF := aux;
        MaxN := DirName + SR.Name;
      end;
    until FindNext(SR) <> 0;
    FindClose(SR);
  end;
  Result := MaxN;
end;

Ejemplo de uso:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
  LastFile: PChar;
begin
  LastFile:= PChar(LastModifiedFile('C:\Users\Rodrix\AppData\Local\Tmp'));
  ShowMessage(LastFile);
end;

( No deja de asombrarme la capacidad interpretativa de orodriguezca )

Saludos

[Casimiro Noteví]

Empezado por ecfisa

( No deja de asombrarme la capacidad interpretativa de orodriguezca )

Sin embargo, otros necesitan capacidad expresiva escrita para darse a entender

[orodriguezca]

Empezado por ecfisa

( No deja de asombrarme la capacidad interpretativa de orodriguezca )

Saludos

Hola ecfisa, yo también estoy asombrado ; solo fue un fugaz momento de inspiración.


Saludos,

[carlosprotos]

Gracias ecfisa , esta excelente ,mas bien dime como seria para que me aparezca en el ShowMessage solo el nombre del "cshxxx.tmp" sin la direccion (C:\Users\Rodrix\AppData\Local\Tmp\cshxxx.tmp')