|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Кто знает подскажите пожалуйсто
Кто знает как приделать своей программе проверку наличия обновлений в интернете и закачку например версия 2.2 проверила и увидела версию 2.3 спросила пользователя если да закачала как это релизовать подскожите пожалуйсто
|
#2
|
||||
|
||||
Можно сделать так:
Код:
procedure Update; const Verison = //Текущая версия; var LastVersion: Real; LastVersionFile: TFileStream; begin LastVersion:=StrToFloat(IdHTTP1.Get('http://yoursite/LastVersion.txt')); if LastVersion > Verison then begin if MessageDlg('Обновить программу?', mtConfirmation, [mbYes, mbNo], 0) = mrYes then begin LastVersionFile:=TFileStream.Create('Файл, в который сохранить новую версию', fmCreate); IdHTTP1.Get('http://yoursite/LastVersion.exe', LastVersionFile); LastVersionFile.Free; end; end else ShowMessage('У вас самая последняя версия'); end; Что делать, когда сломался комп: 1. Если вы юзер - делать ноги. 2. Если ремонтник - делать деньги. 3. Если вы программист - делать вид, что так было задумано. |
#3
|
|||
|
|||
Большое спосибо очень помогло
|