برنامه نویس

VarScan: TScan;StopUp: Boolean;typeTScan = class(TThread)privateIdHTTP1: TIdHTTP;IsUpload: Boolean;procedure HttpWork(ASender: TObject; AWorkMode: TWorkMode;AWorkCount: Int64);protectedprocedure Execute; override;end;procedure TScan.HttpWork(ASender: TObject; AWorkMode: TWorkMode;AWorkCount: Int64);beginif StopUp thenIdHTTP1.Discoect;end;procedure TScan.Execute;beginIdHTTP1 := TIdHTTP.Create(nil);IdHTTP1.HTTPOptions := [hoKeepOrigProtocol];IdHTTP1.OnWork := HttpWork;trycode := IdHTTP1.Post('Address', 'DataStream'); //UploadexceptIdHTTP1.Free;end;IdHTTP1.Free;end;procedure Form1.StartClick(Sender: TObject);beginStopUp := False;Scan := TScan.Create(False);Scan.FreeOnTerminate := True;end;proc...

سلام دوستان.یه اشکالی در رفرش کردن صفحه برام پیش اومده. صفحه ای از سایتی که با ASP نوشتم، کار آپلود فایل رو انجام میده. اما مشکلی هست که وقتی فایلی رو آپلود میکنم، صفحه یه بار کامل به سمت سرور فرستاده میشه و بعد خب فایل آپلود میشه و دوباره همون صفحه برام نمایش داده میشه. اما تکست باکس هایی که موقع آپلود فایل پر کرده بودم، توی صفحه برگشت داده شده، دیگه خالی نمیشن. همچنین وقتی همین صفحه ی برگشت داده...