Идешь сюда >> http://vx.netlux.org/src.php внизу выбираешь язык pascal и будет счастье?
Кстати что с си переписать проблема чтоли =) если знаешь я напрмиер знаю винапи ) и хватает.