log1stable
Junior Member | Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
В секцию Files добавь эти строки:
Source: files\1.jpg; DestDir: {tmp}
Source: files\2.jpg; DestDir: {tmp}
Source: files\3.jpg; DestDir: {tmp}
Source: files\4.jpg; DestDir: {tmp}
Source: files\5.jpg; DestDir: {tmp}
Source: files\6.jpg; DestDir: {tmp}
В процедуру InitializeWizard добавь эти строки после begin:
ExtractTemporaryFile('1.jpg');
ExtractTemporaryFile('2.jpg');
ExtractTemporaryFile('3.jpg');
ExtractTemporaryFile('4.jpg');
ExtractTemporaryFile('5.jpg');
ExtractTemporaryFile('6.jpg');
В процедуру CurPageChanged добавь эти строки после begin:
if CurPageID=wpWelcome then gdipDrawImage(WizardForm.Handle, ExpandConstant('{tmp}\1.jpg'),ScaleX(0),ScaleY(0),ScaleX(642),ScaleY(416),True,True);
if CurPageID=wpSelectDir then gdipDrawImage(WizardForm.Handle, ExpandConstant('{tmp}\2.jpg'),ScaleX(0),ScaleY(0),ScaleX(642),ScaleY(416),True,True);
if CurPageID=wpSelectProgramGroup then gdipDrawImage(WizardForm.Handle, ExpandConstant('{tmp}\3.jpg'),ScaleX(0),ScaleY(0),ScaleX(642),ScaleY(416),True,True);
if CurPageID=wpSelectTasks then gdipDrawImage(WizardForm.Handle, ExpandConstant('{tmp}\4.jpg'),ScaleX(0),ScaleY(0),ScaleX(642),ScaleY(416),True,True);
if CurPageID=wpReady then gdipDrawImage(WizardForm.Handle, ExpandConstant('{tmp}\5.jpg'),ScaleX(0),ScaleY(0),ScaleX(642),ScaleY(416),True,True);
if CurPageID=wpInstalling then gdipDrawImage(WizardForm.Handle, ExpandConstant('{tmp}\6.jpg'),ScaleX(0),ScaleY(0),ScaleX(642),ScaleY(416),True,True);
if CurPageID=wpFinished then gdipDrawImage(WizardForm.Handle, ExpandConstant('{tmp}\1.jpg'),ScaleX(0),ScaleY(0),ScaleX(642),ScaleY(416),True,True);
|
