Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2009.08.02;
Скачать: CL | DM;

Вниз

Clipboard Кодировка   Найти похожие ветки 

 
Iriss   (2009-06-04 15:06) [0]

Добрый день,
Проблема:
копирую данные из StringGrid в Excel через Clipboard(мне так нужно).

пользуюсь этим кодом:
s := "";
   for i := 1 to 5 do begin
     for j := 1 to 5 do
       s := s + StringGrid1.Cells[j,i] + #9;
     s:= s+#13#10;
   end;
   Clipboard.AsText:= s;

Проблема только в том, что русские буквы в Excel кракозяблами показывает.
Как исправить эту проблему с кодировкой?
Спасибо


 
ganda   (2009-06-04 15:18) [1]

В CodeGear 2009 такой проблемы нету. Ниже версий выход по моему один

посмотри функции GetClipboardData и SetClipboardData в юните Windows думаю они тебе помогут


 
Palladin ©   (2009-06-04 15:22) [2]

Есть и другие способы передачи данных в Эксель. Сдался тебе этот клипбоард...


 
sniknik ©   (2009-06-04 15:26) [3]

> Как исправить эту проблему с кодировкой?
включи русский для программы перед выполнением кода.
либо меняй кодировку в клипборде. т.к. по умолчанию она туда из активной попадает (имхо, глюк vcl)


 
супирмегахакер   (2009-06-04 15:27) [4]

LoadKeyboardLayout("00000419", KLF_ACTIVATE);


 
супирмегагигахакер   (2009-06-04 15:31) [5]

var
h:THandle;
begin
Clipboard.Open;
Clipboard.AsText := Memo1.Text;
h := Clipboard.GetAsHandle(CF_TEXT);
SetClipboardData(CF_LOCALE, h);
Clipboard.Close;
end;


 
супирмегахакер   (2009-06-04 15:32) [6]


> супирмегагигахакер   (04.06.09 15:31) [5]

у мну проще ;)


 
Iriss   (2009-06-04 15:39) [7]

Спасибо всем, помогли решить



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

Текущий архив: 2009.08.02;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.013 c
15-1244111344
desc
2009-06-04 14:29
2009.08.02
SharpDevelop+Postgre


3-1225096677
dolmat
2008-10-27 11:37
2009.08.02
Количество месяцев


15-1243586875
Дмитрий Белькевич
2009-05-29 12:47
2009.08.02
FreeAndNil против Free. Интересная концепция.


15-1243926982
xayam
2009-06-02 11:16
2009.08.02
Вопрос по php-ext


2-1244028786
madmech
2009-06-03 15:33
2009.08.02
Неправильно всплывает хинт