My piece of garbage over the internet... Eat that!

Dll embedding in Delphi

wastedump — Mon, 11 Jan 2010 22:22:26 +0000

First to say, I’m aware that dll purpose or libraries in general was/is to modularize programming, so you could move some, somewhat connected, stuff into one place and reuse the code in another projects/replacing just this bit without recompiling the main program, so the idea of embedding dll as a part of exe file itself seems ridiculous, but… yes… there’s but.

The case

What if you have to make sure you will be using some certain function, and that function is located in external library, for which you don’t have or simply don’t want to incorporate sources into your main program. Yes, then your option is either have such dll in resource or `sticked` to the end of your app (not recommended) extract, load, execute and delete after you’re done with it. Messy, isn’t it? First, you can’t be sure if OS will let you use hard drive for storing purposes on every machine, it may be ok in your pc, but that’s not the case in general.

The solution

I stumbled upon one handy library that allows you to load dll stored in memory as binary data, and what else delphi resources are as if not exactly such case?

The library BTMemoryModule is 4 years old already, so I’m not sure if it’ll work on newer compilers/OSes, but it still works for me. On the other hand, I’m still using delphi 9 so I’m not the one to judge
It’s always good idea to check if there’s any updated version…

Short code snippet that should help you do the job:
First, you need to put your dll into resource (*.res) file, you gotta to compile it as well, so…
- Create .rc file as text file put there:

RESOURCENAME RCDATA “yourdllname.dll”

and save as somename.rc
- compile resource:

brcc32.exe somename.rc

that involves using command line, but I’m sure you can cope that
- include resource in your program

{$R somename.res }

and unit BTMemoryModule in your `uses` line
- Finally you can use it, so let’s do:

function LoadresDLL(ResName:String):PBTMemoryModule
var
  dllmem: Pointer;
  dllsize: Integer;
  HResInfo: HRSRC;
  HGlobal: THandle;
begin
  result := nil;
  HResInfo := FindResource(0, ResName, RT_RCDATA);
  HGlobal := LoadResource(0, HResInfo);
  if HGlobal = 0 then raise EResNotFound.Create(‘Can”t load resource.’);
  dllmem := LockResource(HGlobal);
  dllsize := SizeOfResource(0, HResInfo);
  result := BTMemoryLoadLibary(dllmem,dllsize);
end;

So in our test case it’ll be

var dllhandle = BTMemoryModule;
fun : pointer;
begin
  dllhandle := LoadResDLL(‘RESOURCENAME’);
  if (dllhandle = nil) then raise EResNotFound.Create(‘ResLibrary loading failed.’);
  BTMemoryGetProcAddress(mp_MemoryModule, Name);
  // and now we may get desred function address like this…
  fun = BTMemoryGetProcAddress(dllhandle, ‘function_name_you_need’);

// do your stuff here

BTMemoryFreeLibrary(dllhandle); // and clean up…
end;

and that’s all… no hassle, no pain, no additional files to worry about…

And yes, I’m quite aware that’s nothing new, just everything gathered together

Delhi 6

wastedump — Sat, 21 Nov 2009 04:03:34 +0000

Anyone heard ’bout bollywood? Yes, many times I guess, me included. But that’s the first movie I got hooked on by just watching music videos from it… How weird is that? Haven’t see the movie yet, but that’s soon to change.
You can have my wallpaper meanwhile…

1024×768 1280×720

Clipping Point download links…

wastedump — Sun, 04 Oct 2009 21:44:17 +0000

Anyone heard of clipping point? None? No surprise there. It’s (or should I say was) korean free racing game. It’s web page no longer exists and it’s files are hard to find nowadays… but recently I dug working links for that, go figure!

here’s a little teaser how it looks…

and links to files if you’d like to try it out. Enjoy!

http://rapidshare.com/files/193455399/clippingpoint.part1.rar

http://rapidshare.com/files/193489155/clippingpoint.part2.rar

http://rapidshare.com/files/193514330/clippingpoint.part3.rar

http://rapidshare.com/files/193548373/clippingpoint.part4.rar

http://rapidshare.com/files/193570306/clippingpoint.part5.rar

http://rapidshare.com/files/193594976/clippingpoint.part6.rar

http://rapidshare.com/files/193615050/clippingpoint.part7.rar

http://rapidshare.com/files/194302692/clippingpoint.part8.rar

Who Elisabeth Abbott is?

wastedump — Sat, 27 Jun 2009 16:32:43 +0000

I spotted her first when I was browsing an Eve Adams cast list. And she’s lookin’ smookin’ hot in this picture. I hope she won’t be just a side dish to this serie… :/

Sadly the biggest picture i found was just a tiny on from imdb so these below are bit blurry, but looks way better than just stretched ones on my desktop…

1280×1024 1280×720