Уважаемые форумчане. Помогите если возможно. я из начинающих. хотелось написать программу для сугубо практических целей. суть сводится к сбору, сортировке данных.В результате хотелось видеть отчет в word или excel. На этапе сбора и сортировки образуется некий массив. Хочется загнать его в таблицу office. Вот тут загвоздка с обращением к ячейкам. Пробовал с код архивом. там та же история. Таблица попадает в EditorGadget....... и та же история. В первый столбец попадаю и баста
импорт в таблицу из гаджета
Страница: 1
Сообщений 1 страница 4 из 4
Поделиться205.01.2018 13:38:18
В Винде для управления Экселем (или Вордом и пр.) есть специальный инструмент (механизм) formerly called OLE Automation.
В Пурике я это не применял т.к. использую Пурик только для системных целей.
Но на форуме есть ссылки на библиотечку для этих целей.
http://www.purebasic.fr/english/viewtop … ilit=excel
Поделиться305.01.2018 14:18:32
Что то такое скачивал))). Почему то не прижилось. Все равно спасибо. слушайте, а может подскажете как подать команду ГОРИЗОНТАЛЬНОЙ Табуляции. Срабатывает Chr(10), Chr(13). И никакой чувствительности к Chr(9) (Chr(09))
Поделиться409.01.2018 09:10:14
Зависит от имманентных свойств гаджета.
Для Эдита - срабатывает, для Стринга - нет.
Код:
Enumeration #Window_0 #Editor_0 #String_0 EndEnumeration Procedure OpenWindow_0(x = 0, y = 0, width = 600, height = 270) OpenWindow(#Window_0, x, y, width, height, "", #PB_Window_SystemMenu) EditorGadget(#Editor_0, 60, 20, 470, 150) StringGadget(#String_0, 60, 190, 470, 40, "") EndProcedure OpenWindow_0() SetGadgetText(#Editor_0,"Proba"+Chr(9)+"Proba"+#CRLF$+Chr(9)+"Proba"+Chr(9)+"Proba") SetGadgetText(#String_0,"Proba"+Chr(9)+"Proba"+#CRLF$+Chr(9)+"Proba"+Chr(9)+"Proba") Repeat event=WaitWindowEvent() Delay(10) Until Event = #PB_Event_CloseWindow
Страница: 1