Cheat Engine Forum Index Cheat Engine
The Official Site of Cheat Engine
 
 FAQFAQ   SearchSearch   MemberlistMemberlist   UsergroupsUsergroups   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 


[Delphi] Warez Post Generator problem

 
Post new topic   Reply to topic    Cheat Engine Forum Index -> General programming
View previous topic :: View next topic  
Author Message
cicak
Expert Cheater
Reputation: 0

Joined: 02 Apr 2007
Posts: 159
Location: Cheat Engine
PostPosted: Fri May 23, 2008 5:02 am    Post subject: [Delphi] Warez Post Generator problem Reply with quote
Im trying to make a warez post generator but I have some problems Confused

this is my project


when I copy the text in 'Message Body' then paste in notepad it become like this


but if I paste in forum it become like this. its supposed to be like this in notepad Confused


and how do I make if 'password' is empty then it wil not show the "[.code][/code]" in 'Message Body'?

here's the source
Code:
procedure TForm1.Button1Click(Sender: TObject);
begin
subject2.Text := subject.Text;
messagebody.Text := '[img]'+images1.Text+'[/img]' + #13#13 + '[img]'+images2.Text+'[/img]' +#13#13+ '[img]'+images3.Text+'[/img]' +#13#13+ '[img]'+images4.Text+'[/img]' +#13#13#13+
description.Text +#13#13#13+
'[code]'+downloadlink.Text+'[/code]' +#13#13#13+
'[code]'+password.Text+'[/code]';
end;

(I use RichEdit as Message Body)
_________________
Back to top
View user's profile Send private message
HolyBlah
Master Cheater
Reputation: 2

Joined: 24 Aug 2007
Posts: 446
PostPosted: Fri May 23, 2008 5:11 am    Post subject: Reply with quote
Try this, it's check if password.Text is empty:
Code:
procedure TForm1.Button1Click(Sender: TObject);
begin
   subject2.Text := subject.Text;
   messagebody.Text := '[img]'+images1.Text+'[/img]' + #13#13 + '[img]'+images2.Text+'[/img]' +#13#13+ '[img]'+images3.Text+'[/img]' +#13#13+ '[img]'+images4.Text+'[/img]' +#13#13#13+
   description.Text +#13#13#13+
   '[code]'+downloadlink.Text+'[/code]' +#13#13#13;
   if password.Text <> '' then
      messagebody.Text:=messagebody.Text+'[code]'+password.Text+'[/code]';
end;
Back to top
View user's profile Send private message
Dark Byte
Site Admin
Reputation: 475

Joined: 09 May 2003
Posts: 25974
Location: The netherlands
PostPosted: Fri May 23, 2008 6:44 am    Post subject: Reply with quote
use #13#10 instead of #13 alone (carriage return-line feed)
In linux this would be fine though, but windows (notepad) likes the line feed

also, it should probably look fine in wordpad as well
_________________
Tools give you results. Knowledge gives you control.

Like my help? Join me on Patreon so i can keep helping
Back to top
View user's profile Send private message MSN Messenger
cicak
Expert Cheater
Reputation: 0

Joined: 02 Apr 2007
Posts: 159
Location: Cheat Engine
PostPosted: Fri May 30, 2008 4:53 am    Post subject: Reply with quote
Thanks HolyBlah and Dark Byte.
Now my program works perfectly Very Happy
_________________
Back to top
View user's profile Send private message
Cryoma
Member of the Year
Reputation: 198

Joined: 14 Jan 2009
Posts: 1819
PostPosted: Fri May 30, 2008 1:45 pm    Post subject: Reply with quote
Can I have it?
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic    Cheat Engine Forum Index -> General programming All times are GMT - 6 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum
You cannot attach files in this forum
You can download files in this forum


Powered by phpBB © 2001, 2005 phpBB Group

CE Wiki   IRC (#CEF)   Twitter
Third party websites