Качай справочник _http://delphiworld.narod.ru/dw.html - там есть похожие исходники