Форум: "Система";
Текущий архив: 2002.10.17;
Скачать: [xml.tar.bz2];
Внизclipboard Найти похожие ветки
← →
kima (2002-08-11 15:44) [0]Hi all,
проблема такая: есть простейшая консольная прога(10кб
компилиная) в ней надо в клипбоард посестить текст но если
включать библиотеку ClipBRD то прога сразу 300кб!!! можно ли
обойтись без нее? Мне надо только поместить туда(только
латиницу) читать не надо.
С уважением, Алексей.
← →
TAlex (2002-08-11 16:07) [1]procedure CopyStringToClipboard(s: string);
var hg: THandle;
P: PChar;
begin
hg:=GlobalAlloc(GMEM_DDESHARE or GMEM_MOVEABLE, Length(S)+1);
P:=GlobalLock(hg);
StrPCopy(P, s);
GlobalUnlock(hg);
OpenClipboard(Application.Handle);
SetClipboardData(CF_TEXT, hg);
CloseClipboard;
GlobalFree(hg);
end;
← →
kima (2002-08-11 18:28) [2]в консоли Application нету
как быть? не делать консоль
не предлагайте 300kb сразу поднимает
← →
kima (2002-08-12 10:16) [3]блин только спросил уже сам нашел если комуто надо
консоль писать и handle то это HWND ( nil ) под носом
лежало не нашел
Страницы: 1 вся ветка
Форум: "Система";
Текущий архив: 2002.10.17;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.008 c