как сделать скриншот memo1 в delphi ? (читать всё…)

xRamzeSx

procedure TForm1.Button1Click(Sender: TObject);

var

bmp: TBitmap;

DC: HDC;

begin

bmp:=TBitmap.Create;
bmp.Width:=1024;

bmp.Height:=768;
DC:=GetDC(0);
bitblt(bmp.Canvas.Handle, 0, 0, Screen.Width, Screen.Height,

DC, 0, 0, SRCCOPY);
bmp.SaveToFile(FormatDateTime('dd/mm/yy, hh-nn-ss', Now) + '.bmp');
ReleaseDC(0, DC);
bmp.Free;

end;

тема на форуме

SibBear

Есть файл на диске, задача определить какая программа, или процесс в данный момент этот файл используют.
Как это можно реализовать?

(читать всё…)

ассемблер123

подскажите пожалуйста, как можно определить хендл другого приложения зная название exe файла или хендл его окна?

(читать всё…)