Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

clipboard [D6, Win95/98, WinXP]


kima ©   (2002-08-11 15:44:00) 

Hi all,

проблема такая: есть простейшая консольная прога(10кб
компилиная) в ней надо в клипбоард посестить текст но если
включать библиотеку ClipBRD то прога сразу 300кб!!! можно ли
обойтись без нее? Мне надо только поместить туда(только
латиницу) читать не надо.

С уважением, Алексей.


kima   (2002-08-12 10:16:00) [1]

блин только спросил уже сам нашел если комуто надо
консоль писать и handle то это HWND ( nil ) под носом
лежало не нашел


kima   (2002-08-11 18:28:00) [2]

в консоли Application нету
как быть? не делать консоль
не предлагайте 300kb сразу поднимает


TAlex   (2002-08-11 16:07:00) [3]

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;


Наверх

Титульная страница Поиск, карта сайта Написать письмо