loo30fer
دوشنبه 02 آبان 1390, 23:39 عصر
سلام خدمت دوستان
من با کمک این کامپوننت میخوام از صحت پسورد متلع بشم برای همین بدین شکل عملکردم :
if (FlexCompress1.IsFilePasswordValid('C:\testl.rar', '123') = True) then
ShowMessage('True');
end;
ولی این خطا رو میده :
FlexCompress1: Archive is not open - Native error: 00013.
برای همین گفتم شاید باید قبلش فایل باز بشه برای همین بدین شکل عمل کردم :
var
Stream: TMemoryStream;
RecommendationsRemarks: String;
begin
Stream := TMemoryStream.Create;
Stream.LoadFromFile('C:\testl.zip');
SetLength(RecommendationsRemarks, Stream.Size);
Stream.Read(RecommendationsRemarks[1], Stream.Size);
FlexCompress1.OpenArchive(Stream,False);
FlexCompress1.IsFilePasswordValid('C:\testl.rar',' 123');
end;
ولی باز یک خطای دیگه میده :
FlexCompress1: File "C:\testl.rar" not found - Native error: 00042.
آخرش نفهمیدم مشکل از کجاست فکر میکنم کد من مشکل داره اگه امکان داره به کد بنده نگاهی بندازین که مشکل از کجاست؟ ممنون میشم.
من با کمک این کامپوننت میخوام از صحت پسورد متلع بشم برای همین بدین شکل عملکردم :
if (FlexCompress1.IsFilePasswordValid('C:\testl.rar', '123') = True) then
ShowMessage('True');
end;
ولی این خطا رو میده :
FlexCompress1: Archive is not open - Native error: 00013.
برای همین گفتم شاید باید قبلش فایل باز بشه برای همین بدین شکل عمل کردم :
var
Stream: TMemoryStream;
RecommendationsRemarks: String;
begin
Stream := TMemoryStream.Create;
Stream.LoadFromFile('C:\testl.zip');
SetLength(RecommendationsRemarks, Stream.Size);
Stream.Read(RecommendationsRemarks[1], Stream.Size);
FlexCompress1.OpenArchive(Stream,False);
FlexCompress1.IsFilePasswordValid('C:\testl.rar',' 123');
end;
ولی باز یک خطای دیگه میده :
FlexCompress1: File "C:\testl.rar" not found - Native error: 00042.
آخرش نفهمیدم مشکل از کجاست فکر میکنم کد من مشکل داره اگه امکان داره به کد بنده نگاهی بندازین که مشکل از کجاست؟ ممنون میشم.