neresine eklemeliyim ?
function CopyCallback(Source,Destination,Copied,Total,FileCopied,FileTotal)
Progress.SetCurrentPos("Progress1", (Copied / Total) * 100);
yuzde = Math.Floor((Copied / Total) * 100);
Progress.SetText("Progress1", "%"..yuzde.."")
Toplam = Total;
Kaynak = Source;
Hedef = Destination;
mevcutkopyalanan=FileCopied;
Toplamdosya=FileTotal;
nYol = INIFile.GetValue("AutoPlay\\Docs\\data.ini","Dosya","Konum")
Label.SetText("Label3", ""..mevcutkopyalanan);
end
nYol = INIFile.GetValue("AutoPlay\\Docs\\data.ini","Dosya","Konum")
sYol = INIFile.GetValue("AutoPlay\\Docs\\datac.ini","Dosya","Konum")
File.Copy(nYol,sYol, true, true, false, true, CopyCallback);
error = Application.GetLastError();
if error ~= 0 then
Dialog.Message("Hata!", "Dosya İndirilirken Hata Oluştu.\r\nHata Kodu:"..error, MB_OK, MB_ICONSTOP);
end
Dialog.Message("Bilgi", sYol.." konumuna taşındı", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
help dosyasında bir örnek buldum"SecontLeft yada SecontLeftFormat " işimize yarar mı ? ben denedim ama hata aldım
-- Callback function for HTTP.Download
function DownloadCallback (nDownloaded, nTotal, TransferRate, SecondLeft, SecondsLeftFormat, Message)
-- Convert total and downloaded bytes into formatted strings
sDownloaded = String.GetFormattedSize(nDownloaded, FMTSIZE_AUTOMATIC, true);
sTotal = String.GetFormattedSize(nTotal, FMTSIZE_AUTOMATIC, true);
-- Set statusdlg title and message
StatusDlg.SetTitle("Downloading . . . ");
-- Output time left, formatted.
StatusDlg.SetMessage("Currently downloading file . . . Time Left: " .. SecondsLeftFormat);
-- Output formatted sizes to user through statusdlg status text
StatusDlg.SetStatusText("Downloaded: " .. sDownloaded .. " / " .. sTotal);
-- Set meter range (max range = 65534)
StatusDlg.SetMeterRange(0, 65534);
-- Set meter position (fraction downloaded * max meter range)
StatusDlg.SetMeterPos((nDownloaded / nTotal) * 65534);
end
-- Show the StatusDlg
StatusDlg.Show(0, false);
-- Download a file from the internet to the user's computer
-- Uses DownloadCallback() as the callback function
HTTP.Download("http://www.yourdomain.com/downloads/update.exe", _TempFolder .. "\\update.exe", MODE_BINARY, 20, 80, nil, nil, DownloadCallback);
-- Hide the StatusDlg
StatusDlg.Hide();