Thanks Djura, with your suggestion and with the Dominic one I guess will be finally posible to code this feature.

Thanks!


Vyacheslav Djura escribi�:


Hello tei,

Use CreateFile function with the arrtibutes from example on Delphi
below:

var
  InFile      : THandle;
begin
 InFile := CreateFile( pChar( ParamStr( 0 ) ),
                       GENERIC_READ, FILE_SHARE_READ,
                       nil,
                       OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, 0 );

 If InFile = INVALID_HANDLE_VALUE Then
 Begin
    MessageBox( 0, pChar( ParamStr( 0 ) ), STR_EARCHIVE, MB_ICONERROR );
    Exit;
 End;

 //read data using "ReadFile"
 //...

 CloseHandle( InFile );
end;

ParamStr(0) is the same as argv[0]

Best regards,
  Slava                        mailto:[EMAIL PROTECTED]


_______________________________________________
To unsubscribe, edit your list preferences, or view the list archives, please visit:
http://list.valvesoftware.com/mailman/listinfo/hlcoders



Reply via email to