Буфер обмена

← →
KSergey © (2003-11-02 08:07) [0]

Простенькая, вроде, ситуевина, а нифига не пойму.
Копирую из MS Access (97) в Clipboard (часть ихнего грида).
В своей программе проверяю Clipboard.HasFormat(CF_TEXT) - возвращает True, в списке Clipboard.Formats CF_TEXT так же присутствует, однако Clipboard.AsText возвращает пустую строку. Что я недопонимаю?

← →
Alex Konshin © (2003-11-02 09:59) [1]

Unicode?

← →
KSergey © (2003-11-03 08:18) [2]

Мобыть и так, но нафига он тогда говорит, что формат "CF_TEXT" тоже присутствует? ;)

Надо попробовать, так я в общем понял...

← →
Dmitriy (2003-12-19 14:57) [3]

//Попробуй следующее...

var

MyHandle: THandle;
TextPtr: PChar;
MyString: string;
begin
ClipBoard.Open;
try
MyHandle := Clipboard.GetAsHandle(CF_TEXT);
TextPtr := GlobalLock(MyHandle);
MyString := StrPas(TextPtr);
GlobalUnlock(MyHandle);
finally
Clipboard.Close;
end;
end;

Буфер обмена Найти похожие ветки