Имя пользователя:
Пароль:
 

Показать сообщение отдельно

Аватара для Johny777

Ветеран


Сообщения: 649
Благодарности: 444

Профиль | Отправить PM | Цитировать


GoshaPolo,
прочитай ка ты дружочек сначала справочку по 1-му вопросу!
(вот тебе русская справка http://sendfile.su/570136)
,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,, ,,,
по второму вопросу для ярлыка:
читать дальше »
Код: Выделить весь код
[Setup]
AppName=Моя программа
AppVersion=1.5
DefaultDirName={pf}\Моя программа
OutputDir=.


[Icons]
Name: "{commondesktop}\Моя программа"; Filename: "{app}\MyProg.exe"; Check: Make_Icon

[  Code]
var
  IconCheckBox: TNewCheckBox;
  
function Make_Icon: Boolean;
begin
  Result:=IconCheckBox.Checked;
end;

procedure InitializeWizard();
begin

  IconCheckBox := TNewCheckBox.Create(WizardForm);
  with IconCheckBox do
  begin
    Parent := WizardForm;
    SetBounds(ScaleX(48), ScaleY(328), ScaleX(97), ScaleY(17))
    Caption := 'Создать ярлык';
  end;
  
end;

для запуска (секция RUN) таким же макаром через Check
,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,
по третьему:
через GetSystemMetrics,
здесь http://innoultra.ru/?page_id=18 под 43-м номером 2 варианта

Последний раз редактировалось Johny777, 29-05-2012 в 12:54.

Это сообщение посчитали полезным следующие участники:

Отправлено: 12:39, 29-05-2012 | #86