Please C++ TO Delphi

Please support our Pascal and Delphi advertiser: Programming Forums - DaniWeb Sister Site
Reply

Join Date: May 2009
Posts: 5
Reputation: Leila1 has a little shameless behaviour in the past 
Solved Threads: 0
Leila1 Leila1 is offline Offline
Newbie Poster

Please C++ TO Delphi

 
-1
  #1
Aug 7th, 2009
Please C++ TO Delphi

Pascal and Delphi Syntax (Toggle Plain Text)
  1. IMAGE_NT_HEADERS* inh;
  2. IMAGE_SECTION_HEADER* ish;
  3.  
  4. DWORD newRVA = (ish + inh->FileHeader.NumberOfSections - 1)->VirtualAddress + ((ish + inh->FileHeader.NumberOfSections - 1)->Misc.VirtualSize + (inh->OptionalHeader.SectionAlignment - (((ish + inh->FileHeader.NumberOfSections - 1)->Misc.VirtualSize % inh->OptionalHeader.SectionAlignment) ? ((ish + inh->FileHeader.NumberOfSections - 1)->Misc.VirtualSize % inh->OptionalHeader.SectionAlignment) : inh->OptionalHeader.SectionAlignment)));
  5.  
  6.  
  7. newSecSize = (newSecSize + (inh->OptionalHeader.FileAlignment - ((newSecSize % inh->OptionalHeader.FileAlignment) ? (newSecSize % inh->OptionalHeader.FileAlignment) : inh->OptionalHeader.FileAlignment)));
  8.  
  9.  
  10. ish->Misc.VirtualSize = (newSecSize + (inh->OptionalHeader.SectionAlignment - ((newSecSize % inh->OptionalHeader.SectionAlignment) ? (newSecSize % inh->OptionalHeader.SectionAlignment) : inh->OptionalHeader.SectionAlignment)));
  11.  
  12. DWORD* hVMImg;
  13.  
  14. DWORD _ssss = (*(DWORD*)(hVMImg + 7))*4 + (*(DWORD*)(hVMImg + 8))*8 + 4;
  15.  
  16.  
  17. BYTE* outCodeBuf;
  18. int outPos = 0;
  19. BYTE* instr;
  20.  
  21. *(DWORD*)(outCodeBuf + outPos + 4) = (int)*((char*)instr + 3);
  22. *(DWORD*)(outCodeBuf + outPos + 4) = *(DWORD*)(instr + 2);
  23.  
  24. BYTE* outCodeBuf;
  25. int outPos = 0;
  26. BYTE* codeBase;
  27. int curPos = 0;
  28. struct
  29. {
  30. DWORD disasm_len;
  31. } dis;
  32.  
  33. memmove(outCodeBuf + outPos + 1, codeBase + curPos, dis.disasm_len);
Reply With Quote Quick reply to this message  
Join Date: Jul 2009
Posts: 18
Reputation: TeejMonster is an unknown quantity at this point 
Solved Threads: 1
TeejMonster's Avatar
TeejMonster TeejMonster is offline Offline
Newbie Poster

Re: Please C++ TO Delphi

 
0
  #2
Aug 7th, 2009
See http://www.daniweb.com/forums/faq.ph...niweb_policies for the forum rules before posting.

Originally Posted by DaniWeb Rules
Do not post homework problems expecting a quick answer without showing any effort yourself. This especially pertains to the software development forums.
Why not see how much you can do by yourself. You'll learn more that way, and you may (god forbid) have a little fun :p
Reply With Quote Quick reply to this message  
Join Date: Dec 2005
Posts: 5,850
Reputation: Salem has a reputation beyond repute Salem has a reputation beyond repute Salem has a reputation beyond repute Salem has a reputation beyond repute Salem has a reputation beyond repute Salem has a reputation beyond repute Salem has a reputation beyond repute Salem has a reputation beyond repute Salem has a reputation beyond repute Salem has a reputation beyond repute Salem has a reputation beyond repute 
Solved Threads: 751
Team Colleague
Salem's Avatar
Salem Salem is offline Offline
Void main'ers are DOOMed

Re: Please C++ TO Delphi

 
0
  #3
Aug 7th, 2009
They're just a helpless skiddie wannabe, trying to do something or other with someone else's malware kit.

I've seen it, it's rubbish.
http://www.daniweb.com/forums/thread194496.html
http://www.daniweb.com/forums/thread195594.html
Reply With Quote Quick reply to this message  
Reply

This thread is more than three months old.
Perhaps start a new thread instead?
Message:



Similar Threads
Other Threads in the Pascal and Delphi Forum


Views: 383 | Replies: 2
Thread Tools Search this Thread



Tag cloud for Pascal and Delphi
About Us | Contact Us | Advertise | DaniWeb | Acceptable Use Policy | RSS Feed

©2003 - 2009 DaniWeb® LLC