Сообщений в теме: 11

[arttty7]

Всем привет, с вами arttty7.
Сегодня я вам покажу как сделать выбор скинов в трейнере - чите при нажатии на кнопку.

Этот видео урок для тех кто не знал и кому это нужно.

Код для кнопки:

Скрытый текст

Form1.sSkinManager1.SkinName:='NeonNight (internal)';

СКАЧАТЬ

[MByte]

что мешает добавить в комбобокс  все Скины, а на кнопке написать form1.sskinmanager1.skinname := scombobox1.text; 

[arttty7]

что мешает добавить в комбобокс  все Скины, а на кнопке написать form1.sskinmanager1.skinname := scombobox1.text; 

Ничего не мешает, я просто показал кому интересно, пусть сами сделают)

[ManGo]

Спасибо, скажи название музыки

[arttty7]

Спасибо, скажи название музыки

Hollywood undead – No

Сообщение отредактировал arttty7: 21 декабря 2014 - 21:24

[Romcheg]

 

Спасибо, скажи название музыки

Hollywood undead – No

 

я могу альтернативный способ показать - чтобы открылось окно и там можно было выбрать любой скин который хошь - причем одним кодом на кнопку

[Romcheg]

 

что мешает добавить в комбобокс  все Скины, а на кнопке написать form1.sskinmanager1.skinname := scombobox1.text; 

Ничего не мешает, я просто показал кому интересно, пусть сами сделают)

 

я могу показать способ сделать выбор любых скинов и даже не внедренных в трейн - притом кодом на одну кнопку

Сообщение отредактировал Romcheg: 22 декабря 2014 - 21:36

[BiosNop]

Хей, а зачем обращаться по полному уточняющему имени если пишешь в процедуре формы? Достаточно sSkinManager1.SkinName := 'skin name';

[MByte]

Рома, если ты сделаешь Скины которые не внедрены, то у того у кого запустит трейнер, а скинов на компе не будет то скин и не покажет, как по мне альфа Скины говно

[dima dima]

можно рандомом обойтись

 

procedure TForm1.sButton1Click(Sender: TObject);

begin

  sSkinManager1.SkinName := sSkinManager1.GetRandomSkin;

  sSkinManager1.Active := True;

end;

[Romcheg]

 

можно рандомом обойтись

 

procedure TForm1.sButton1Click(Sender: TObject);

begin

  sSkinManager1.SkinName := sSkinManager1.GetRandomSkin;

  sSkinManager1.Active := True;

end;

 

хах *** я в другой теме намного раньше писал код рандомного скина

[dima dima]

 

 

можно рандомом обойтись

 

procedure TForm1.sButton1Click(Sender: TObject);

begin

  sSkinManager1.SkinName := sSkinManager1.GetRandomSkin;

  sSkinManager1.Active := True;

end;

 

хах *** я в другой теме намного раньше писал код рандомного скина

 

да? походу я не заметил