Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2004.10.10;
Скачать: [xml.tar.bz2];

Вниз

Clipboard+Word   Найти похожие ветки 

 
DimonNew   (2004-09-24 15:08) [0]

Привет! Кто-нибудь сталкивался с такой проблемой. Заноситься какая-то строка с русскими буквами в Clipboard. При копирование потом из буфера в Word, русские буквами заменяются какими-то символами. Как можно сделать так, чтобы они отображались нормально в Worde? И еще вопрос, каким форматом вписать ссылку в Clipboard, чтобы она вставилась в Word, как ссылка?


 
clickmaker ©   (2004-09-24 15:32) [1]

1.
procedure SetClipboardText(const S: string);
 var
   wsz: PWideChar;
   dwSize: Cardinal;
   hData: Cardinal;
 begin
   if (Win32Platform = VER_PLATFORM_WIN32_NT) then begin

     dwSize := (Length(S)+1) * SizeOf(WideChar);
     hData := GlobalAlloc(GMEM_MOVEABLE or GMEM_DDESHARE, dwSize);
     wsz := PWideChar(GlobalLock(hData));
     StringToWideChar(S, wsz, Length(S)+1);
     GlobalUnlock(hData);
     Clipboard.SetAsHandle(CF_UNICODETEXT, hData);
   end else
     Clipboard.AsText := S;
 end;

2. Ворд сам распознает ссылки


 
DimonNew   (2004-09-24 16:18) [2]

Спасибо за 1, а вот второе... Ссылка называется например Описание, а ссылается на какой-то адрес. Как быть в таком случае?


 
clickmaker ©   (2004-09-24 16:45) [3]


> [2] DimonNew   (24.09.04 16:18)
> Спасибо за 1, а вот второе... Ссылка называется например
> Описание, а ссылается на какой-то адрес. Как быть в таком
> случае?

Стандартных форматов для обмена ссылками по клипборду вроде как нет. Видимо офисные приложения регистрируют для них свой формат


 
DimonNew   (2004-09-24 17:14) [4]

Как страшна правда Worda. Действительно никак нельзя передать ссылку в эту чудо-программу. Спасибо большое за помощь!



Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2004.10.10;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.03 c
14-1095499311
VID
2004-09-18 13:21
2004.10.10
Как берут на работу в салон сотовой связи "Связной" (Москва)


6-1090997710
Глеб
2004-07-28 10:55
2004.10.10
Как передавать файлы по сокетам?


3-1094728587
Yurko
2004-09-09 15:16
2004.10.10
Объединение таблиц по нескольким полям


1-1095615292
Кодер
2004-09-19 21:34
2004.10.10
Как создать сервис?


4-1093902801
nimble
2004-08-31 01:53
2004.10.10
Дистанционное управление





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский