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

Вниз

Проблема в excel   Найти похожие ветки 

 
Farel   (2008-01-03 10:50) [0]

Здраствуйте!
Всех с наступившим новым годом)

Я через clipboard передаю в ячейкеу excel текст. В clipboard"e текст может содержать абзацы). И после передачи я получаю текст который не полностью отображается в ячейке.

Лисицы не требовательны как в своих целях, так и в отношениях с ....... и все дальше текста не видно(

В  формате ячеек поставил переносить по словам, но все равно не работает

подскажите в чем проблема.
надеюсь понятно объяснил проблему)


 
YurikGL ©   (2008-01-03 11:13) [1]

Если ты вставляешь текст в Excel силами своего ПО (из Delphi) то не пользуйся буфером обмена. Обращайся напрямую к ячейкам


 
Farel ©   (2008-01-03 11:16) [2]

То же самое.
Если есть абзацы в тексте(который вставляю) Excel просто не переносит слова на следующюю строку  в ячейке.
А если нет абзацев, то все нормально.


 
YurikGL ©   (2008-01-03 14:30) [3]


> Если есть абзацы в тексте(который вставляю) Excel просто
> не переносит слова на следующюю строку  в ячейке.

Давай код.
И не забудь строчки, где выставляешь параметры ячейки.


 
Anatoly Podgoretsky ©   (2008-01-03 15:07) [4]

> Farel  (03.01.2008 10:50:00)  [0]

А где тут абзацы?


 
Farel ©   (2008-01-03 18:32) [5]

вот:
readln(f,s) ;
ExcelWorksheet1.Cells[63,1].value := ExcelWorksheet1.Cells[63,1].value+s;
И все.


 
Farel ©   (2008-01-03 18:38) [6]

а параметры ячейки я выставляю в самом документе excel
а потм его открываю и редактирую с помощью программы


 
Farel ©   (2008-01-04 08:53) [7]

! кто нить может помочь


 
YurikGL ©   (2008-01-04 14:16) [8]


> а параметры ячейки я выставляю в самом документе excel
> а потм его открываю и редактирую с помощью программы
>

Делай все из Delphi


> readln(f,s) ;
> ExcelWorksheet1.Cells[63,1].value := ExcelWorksheet1.Cells[63,
> 1].value+s;

Где здесь абзацы? Используй символ переноса.


 
Farel ©   (2008-01-04 18:21) [9]

я пример неудачный привел, абзацы там есть.
я могу сделать и сам абзац (ну #13) или перенос, но мне надо чтобы когда текст начинает не вмешаться в ячейку переносил на след строку.
Т.Е. я объединил несколько ячеек и передаю кучу текста(он генерируются определенным образом, но это не по теме) в эту БОЛЬШУЮ объединенную ячейку и когда в этом тексте нет абзацев excel спокойно переносит на след строчку, но как встречается абзац, то пипец( текст становится не видимым(ну не помещается в ячейку) и соответсвенно на печати тоже его не видно., но в редакторе, который под меню распложен весь текст как надо. вот)


 
TStas ©   (2008-01-04 21:58) [10]

Но тогда ответ ведь напрашивается сам. Взять текст в Вашей программе. Аккуратно выбросить из него символы перевода строки #13#10, заменив их пробелами.


 
Farel ©   (2008-01-04 23:48) [11]

#13#10 у меня нет в коде.
Просто передаю текст считывая его из файла и если появляется абзац в этом тексте то при вставке возникает эта проблема.


 
Farel ©   (2008-01-05 00:21) [12]

)))HELP!


 
Саша   (2008-01-05 00:59) [13]

А если предварительно обработать файл, в котором текст и убрать от туда все #13#10. А после этого уже вставлять в ячейку?
Для наглядности процесса можно использовать Memo, если файл txt, то просто Memo1.Lines.LoadFromFile(где он там);
Потом на какую-нибудь кнопку кинуть:
Memo1.Text:=stringReplace(Memo1.Text,#13#10,#32,[rfReplaceAll]);
И уже этот обработанный текст вставлять в ячейку.


 
TStas ©   (2008-01-05 21:14) [14]

Возможно, у Вас есть #10 и #13 только отдельно. Ну и выбрасывайте их поотдельности.



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

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

Наверх




Память: 0.5 MB
Время: 0.022 c
2-1199798648
AntonUSAnoV
2008-01-08 16:24
2008.02.03
Помогите!


15-1198847337
Jeer
2007-12-28 16:08
2008.02.03
С наступающими !


2-1199770321
XerSon
2008-01-08 08:32
2008.02.03
Как в реестр записать и считать двоичные данные, к примеру (50)


3-1190718421
Nemec
2007-09-25 15:07
2008.02.03
Обновление данных на форме под InterBase


2-1199727919
T54
2008-01-07 20:45
2008.02.03
TTreeView