|
|
|
|
|||||||
| View Poll Results: Should installations compiled with Installer Creator be protected using methods. | |||
| Yes, I'd like all my installations to be protected. I don't want people to steal my ideas. |
|
1 | 16.67% |
| No, I like to share my ideas because it may open new paths for other people. |
|
5 | 83.33% |
| Voters: 6. You may not vote on this poll | |||
![]() |
|
|
Thread Tools | Search this Thread | Display Modes |
|
#511
|
|||
|
|||
|
Quote:
the credits is have no problem. and you should atlast let razor credit himself. why? because this Software is awesome and FREE. easy and simple to use for Beginners like me. and more easy than Inno setup |
| Sponsored Links |
|
#512
|
|||
|
|||
|
Quote:
First time yener disappeared, it was because of this... People taking his work and removing the credits. Razor hardcoded that part and it can't be removed. |
| The Following User Says Thank You to HellRazor For This Useful Post: | ||
4tRUst (18-01-2014) | ||
|
#513
|
|||
|
|||
|
Quote:
While i dont use nor like CD, seems he spent enough time on this application to make things easier for noobs like you (if he didnt grab the source from elsewhere again), and yet you still whine about how to remove his and even translators' names. LOL ROFL ROFLLOL I decided to leave FF like yener did right after he left, seems i'm not gonna regret about it, considering your species still exist in here and havent learned any-fucking-thing since the beginning. I reaaaalıy fed up with your kind mate. Just wanted to say it. |
|
#514
|
||||
|
||||
|
Quote:
so if he wants to make you the favor ![]()
|
|
#515
|
|||
|
|||
|
Quote:
i dont believe this rofl. some people just want remove Credits for FUCK REASON. |
|
#516
|
||||
|
||||
|
riodsa123 & everyone else... be very careful how you speak/write in this forum. I too, don't care for the request nor his 'reasons' behind it, but I don't need to swear when I reply, nor should you OR anyone else here. If you don't like a post, then report it, and let the forum mods handle it.
|
|
#517
|
|||
|
|||
|
#518
|
||||
|
||||
|
another update pending don't worry.
I'm afraid not, Credits cannot be removed like y_thelastknight said, and also what riodsa123, this is a freeware software and a lot of people spent their time bringing up this program so it can't be done. and altef_4, y_thelastknight, logrim, pakrat2k2, sentinelks; I finally did this function to read imported regs. can y'all understand it? it can read strings, dword and binary, I'll have to move on to Multistring and ExpandString Soon. Can't believe I can do such at my age. I'll kill everyone when I get to varsity. Code:
var
X: Integer;
RegType: String;
FirstLine: Boolean;
begin
OpenDialog1.Filter := 'Registry Files (*.reg)|*.reg';
if OpenDialog1.Execute then
begin
if FileExists(OpenDialog1.FileName) then
begin
Memo1.Lines.LoadFromFile(OpenDialog1.FileName);
X := 1;
FirstLine := True;
repeat
RegType := AnsiLeftStr(AnsiRightStr(Memo1.Lines.Strings[X + 2],
Length(Memo1.Lines.Strings[X + 2]) -
Length(ReplaceStr(AnsiLeftStr(Memo1.Lines.Strings[X + 2], AnsiPos('=',
Memo1.Lines.Strings[X + 2]) - 1), '"', '')) - 3),
AnsiPos(':', AnsiRightStr(Memo1.Lines.Strings[X + 2],
Length(Memo1.Lines.Strings[X + 2]) -
Length(ReplaceStr(AnsiLeftStr(Memo1.Lines.Strings[X + 2], AnsiPos('=',
Memo1.Lines.Strings[X + 2]) - 1), '"', '')) - 3)));
if (RegType = 'dword:') or (RegType = 'hex:') or
(AnsiPos('"="', Memo1.Lines.Strings[X + 2]) <> 0) or
(AnsiPos('@="', Memo1.Lines.Strings[X + 2]) <> 0) or
(AnsiPos('@=dword:', Memo1.Lines.Strings[X + 2]) <> 0) or
(AnsiPos('@=hex:', Memo1.Lines.Strings[X + 2]) <> 0) then
begin
StringGrid6.RowCount := StringGrid6.RowCount + 1;
if FirstLine then
begin
FirstLine := False;
StringGrid6.Cells[0, StringGrid6.RowCount - 1] :=
ReplaceStr(AnsiLeftStr(Memo1.Lines.Strings[2],
AnsiPos('\', Memo1.Lines.Strings[2]) - 1), '[', '');
StringGrid6.Cells[1, StringGrid6.RowCount - 1] :=
ReplaceStr(ReplaceStr(AnsiRightStr(Memo1.Lines.Strings[2],
Length(Memo1.Lines.Strings[2]) - Length(StringGrid6.Cells[0,
StringGrid6.RowCount - 1]) - 2), ']', ''), '\Wow6432Node', '');
end
else
begin
if AnsiPos('[H', Memo1.Lines.Strings[X + 1]) <> 0 then
begin
StringGrid6.Cells[0, StringGrid6.RowCount - 1] :=
ReplaceStr(AnsiLeftStr(Memo1.Lines.Strings[X + 1],
AnsiPos('\', Memo1.Lines.Strings[X + 1]) - 1), '[', '');
StringGrid6.Cells[1, StringGrid6.RowCount - 1] :=
ReplaceStr(ReplaceStr(AnsiRightStr(Memo1.Lines.Strings[X + 1],
Length(Memo1.Lines.Strings[X + 1]) - Length(StringGrid6.Cells[0,
StringGrid6.RowCount - 1]) - 2), ']', ''), '\Wow6432Node', '');
end
else
begin
StringGrid6.Cells[0, StringGrid6.RowCount - 1] :=
StringGrid6.Cells[0, StringGrid6.RowCount - 2];
StringGrid6.Cells[1, StringGrid6.RowCount - 1] :=
StringGrid6.Cells[1, StringGrid6.RowCount - 2];
end;
end;
if (AnsiPos('"="', Memo1.Lines.Strings[X + 2]) <> 0) or
(AnsiPos('@="', Memo1.Lines.Strings[X + 2]) <> 0) then
StringGrid6.Cells[2, StringGrid6.RowCount - 1] := 'String';
if (RegType = 'dword:') or
(AnsiPos('@=dword:', Memo1.Lines.Strings[X + 2]) <> 0) then
StringGrid6.Cells[2, StringGrid6.RowCount - 1] := 'DWORD';
if (RegType = 'hex:') or
(AnsiPos('@=hex:', Memo1.Lines.Strings[X + 2]) <> 0) then
StringGrid6.Cells[2, StringGrid6.RowCount - 1] := 'Binary';
if StringGrid6.Cells[2, StringGrid6.RowCount - 1] = 'String' then
begin
if (AnsiPos('"="', Memo1.Lines.Strings[X + 2]) <> 0) then
begin
StringGrid6.Cells[3, StringGrid6.RowCount - 1] :=
ReplaceStr(AnsiLeftStr(Memo1.Lines.Strings[X + 2],
AnsiPos('=', Memo1.Lines.Strings[X + 2]) - 1), '"', '');
StringGrid6.Cells[4, StringGrid6.RowCount - 1] :=
AnsiLeftStr
(ReplaceStr(ReplaceStr(AnsiRightStr(Memo1.Lines.Strings[X + 2],
Length(Memo1.Lines.Strings[X + 2]) - Length(StringGrid6.Cells[3,
StringGrid6.RowCount - 1]) - 4), '\\', '\'), '\"', '"'),
Length(ReplaceStr(ReplaceStr(AnsiRightStr(Memo1.Lines.Strings[X
+ 2], Length(Memo1.Lines.Strings[X + 2]) -
Length(StringGrid6.Cells[3, StringGrid6.RowCount - 1]) - 4),
'\\', '\'), '\"', '"')) - 1);
end
else
begin
StringGrid6.Cells[3, StringGrid6.RowCount - 1] :=
ReplaceStr(AnsiLeftStr(Memo1.Lines.Strings[X + 2],
AnsiPos('=', Memo1.Lines.Strings[X + 2]) - 1), '@', '');
StringGrid6.Cells[4, StringGrid6.RowCount - 1] :=
AnsiLeftStr
(ReplaceStr(ReplaceStr(AnsiRightStr(Memo1.Lines.Strings[X + 2],
Length(Memo1.Lines.Strings[X + 2]) - Length(StringGrid6.Cells[3,
StringGrid6.RowCount - 1]) - 3), '\\', '\'), '\"', '"'),
Length(ReplaceStr(ReplaceStr(AnsiRightStr(Memo1.Lines.Strings[X
+ 2], Length(Memo1.Lines.Strings[X + 2]) -
Length(StringGrid6.Cells[3, StringGrid6.RowCount - 1]) - 3),
'\\', '\'), '\"', '"')) - 1);
end;
end;
if StringGrid6.Cells[2, StringGrid6.RowCount - 1] = 'DWORD' then
begin
if RegType = 'dword:' then
begin
StringGrid6.Cells[3, StringGrid6.RowCount - 1] :=
ReplaceStr(AnsiLeftStr(Memo1.Lines.Strings[X + 2],
AnsiPos('=', Memo1.Lines.Strings[X + 2]) - 1), '"', '');
StringGrid6.Cells[4, StringGrid6.RowCount - 1] :=
'0x' + AnsiRightStr(Memo1.Lines.Strings[X + 2],
Length(Memo1.Lines.Strings[X + 2]) - Length(StringGrid6.Cells[3,
StringGrid6.RowCount - 1]) - 9);
end
else
begin
StringGrid6.Cells[3, StringGrid6.RowCount - 1] :=
ReplaceStr(AnsiLeftStr(Memo1.Lines.Strings[X + 2],
AnsiPos('=', Memo1.Lines.Strings[X + 2]) - 1), '@', '');
StringGrid6.Cells[4, StringGrid6.RowCount - 1] :=
'0x' + AnsiLeftStr(AnsiRightStr(Memo1.Lines.Strings[X + 2],
Length(Memo1.Lines.Strings[X + 2]) - Length(StringGrid6.Cells[3,
StringGrid6.RowCount - 1]) - 8),
Length(AnsiRightStr(Memo1.Lines.Strings[X + 2],
Length(Memo1.Lines.Strings[X + 2]) - Length(StringGrid6.Cells[3,
StringGrid6.RowCount - 1]) - 3)) - 1);
end;
end;
if StringGrid6.Cells[2, StringGrid6.RowCount - 1] = 'Binary' then
begin
if RegType = 'hex:' then
begin
StringGrid6.Cells[3, StringGrid6.RowCount - 1] :=
ReplaceStr(AnsiLeftStr(Memo1.Lines.Strings[X + 2],
AnsiPos('=', Memo1.Lines.Strings[X + 2]) - 1), '"', '');
StringGrid6.Cells[4, StringGrid6.RowCount - 1] :=
ReplaceStr(AnsiRightStr(Memo1.Lines.Strings[X + 2],
Length(Memo1.Lines.Strings[X + 2]) - Length(StringGrid6.Cells[3,
StringGrid6.RowCount - 1]) - 7), ',', ' ');
repeat
if AnsiPos('\', Memo1.Lines.Strings[X + 2]) <> 0 then
begin
X := X + 1;
StringGrid6.Cells[4, StringGrid6.RowCount - 1] :=
StringGrid6.Cells[4, StringGrid6.RowCount - 1] +
ReplaceStr(Memo1.Lines.Strings[X + 2], ',', ' ');
end;
until AnsiPos('\', Memo1.Lines.Strings[X + 2]) = 0;
StringGrid6.Cells[4, StringGrid6.RowCount - 1] :=
ReplaceStr(StringGrid6.Cells[4, StringGrid6.RowCount - 1],
' \ ', '');
end
else
begin
StringGrid6.Cells[3, StringGrid6.RowCount - 1] :=
ReplaceStr(AnsiLeftStr(Memo1.Lines.Strings[X + 2],
AnsiPos('=', Memo1.Lines.Strings[X + 2]) - 1), '@', '');
StringGrid6.Cells[4, StringGrid6.RowCount - 1] :=
ReplaceStr(AnsiLeftStr(AnsiRightStr(Memo1.Lines.Strings[X + 2],
Length(Memo1.Lines.Strings[X + 2]) - Length(StringGrid6.Cells[3,
StringGrid6.RowCount - 1]) - 6),
Length(AnsiRightStr(Memo1.Lines.Strings[X + 2],
Length(Memo1.Lines.Strings[X + 2]) - Length(StringGrid6.Cells[3,
StringGrid6.RowCount - 1]) - 3)) - 1), ',', ' ');
repeat
if AnsiPos('\', Memo1.Lines.Strings[X + 2]) <> 0 then
begin
X := X + 1;
StringGrid6.Cells[4, StringGrid6.RowCount - 1] :=
StringGrid6.Cells[4, StringGrid6.RowCount - 1] +
ReplaceStr(Memo1.Lines.Strings[X + 2], ',', ' ');
end;
until AnsiPos('\', Memo1.Lines.Strings[X + 2]) = 0;
StringGrid6.Cells[4, StringGrid6.RowCount - 1] :=
ReplaceStr(StringGrid6.Cells[4, StringGrid6.RowCount - 1],
' \ ', '');
end;
end;
end;
X := X + 1;
if Memo1.Lines.Strings[X + 2] = '' then
X := X + 1;
until Memo1.Lines.Strings[X + 2] = '';
end;
end;
end;
Last edited by Razor12911; 10-01-2014 at 08:28. |
| The Following 5 Users Say Thank You to Razor12911 For This Useful Post: | ||
78372 (21-11-2019), oltjon (10-01-2014), pakrat2k2 (10-01-2014), riodsa123 (10-01-2014), y_thelastknight (10-01-2014) | ||
|
#519
|
||||
|
||||
|
Quote:
. Took me 2 days to figure out how to apply this feature.
|
|
#520
|
||||
|
||||
|
you're a LEGEND
![]() ![]()
|
| The Following User Says Thank You to oltjon For This Useful Post: | ||
Razor12911 (10-01-2014) | ||
|
#521
|
||||
|
||||
|
thanks man. I'll upload v1.2.2.0. I made a lot of changes and bug fixing of course. and check out the setup.ini, biggest one I ever made or created with IC (1mb).
![]() the compile for all the registries took nearly 7 min and no data was added, just the registries 3592 Values and no bugs. Sweet
|
|
#522
|
|||
|
|||
|
Quote:
![]() Quote:
==== edit ==== just trying to make Metal Gear Rising Revengeance Installer ( the instalation took 40 mins rofl )![]() ![]() btw there is a little Glitch/Errors here the pics the installer is not showing the name ( in taskbar or something else i dont know what should i said it )
Last edited by riodsa123; 10-01-2014 at 14:10. |
|
#523
|
||||
|
||||
|
I'll have to check it out the bugs/errors before update then
BTW: Great Design of the Installation. Really awesome. Either way, anyone with Itanium CPU? Last edited by Razor12911; 11-01-2014 at 02:57. |
|
#524
|
|||
|
|||
|
Hey razor.
How to remove name of the installer creater from the credits ? |
|
#525
|
||||
|
||||
|
you can't.
|
![]() |
|
|
Similar Threads
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
| INDEX - Conversion Tutorial Index | Razor12911 | Conversion Tutorials | 5 | 11-06-2020 02:05 |
| Source Code: Conversion Converter | Razor12911 | Conversion Tutorials | 66 | 31-03-2018 18:53 |
| Preview: Conversion Tool for Advanced Setup Creator | Razor12911 | Conversion Tutorials | 6 | 10-05-2017 00:30 |
| Simple Conversion Help | akarikk | Conversion Tutorials | 4 | 09-11-2014 14:21 |