| Автор | Сообщение |
|
|
| постоянный участник
|
Пост N: 7956
Зарегистрирован: 12.09.06
|
|
Отправлено: 22.03.25 12:35. Заголовок: TsBrowse. Как сделать объединение ячеек ?
Создаю ТСБ из массивов, небольшой отчет по годам. Возможно ли сделать показ одной большой строки в ТСБ ? Это как в Экселе делается объединение нескольких ячеек для показа длинного текста - подзаголовка. Вот так как на картинке: 
|
 |

|
|
Ответов - 25
, стр:
1
2
All
[только новые]
|
|
|
|
| постоянный участник
|
Пост N: 7999
Зарегистрирован: 12.09.06
|
|
Отправлено: 09.06.25 17:32. Заголовок: Показ карточки с цве..
Показ карточки с цветными TAB из TSB в новой версии МиниГуи C:\MiniGUI_2506\SAMPLES\Advanced\Tsb_EditDbf\demo3.hbp
|
 |

|
|
|
| постоянный участник
|
Пост N: 8000
Зарегистрирован: 12.09.06
|
|
Отправлено: 11.06.25 12:08. Заголовок: Что то не собирается..
Что то не собирается пример C:\MiniGUI_2506\SAMPLES\Advanced\Tsb_EditDbf\demo1-ru.hbp Под новым компилятором: W:\…ProjectMiniGui\@PROJECT\@TSBROWSE---\Tsb_array_EditDbf>c:\MiniGuiBcc77_2506\build.bat -DDEBUG demo1-ru.hbp building... c:\MiniGuiBcc77_2506\ c:\MiniGuiBcc77_2506\build.bat c:\bcc770 Harbour 3.2.0dev (r2502211016) Copyright (c) 1999-2025, https://harbour.github.io/ Borland Resource Compiler Version 5.40 Copyright (c) 1990, 1999 Inprise Corporation. All rights reserved. Borland Resource Compiler Version 5.40 Copyright (c) 1990, 1999 Inprise Corporation. All rights reserved. OBJ\demo1.c: OBJ\demo1_array.c: OBJ\GetSet_array_dbf.c: OBJ\demo1_util.c: OBJ\demo1_line64.c: OBJ\tsb_Checkerboard.c: OBJ\tsb_EditWindows.c: OBJ\tsb_SprDefect.c: OBJ\tsb_Tovar.c: OBJ\tsb_tovar_outfit.c: OBJ\tsb_memo_cell.c: OBJ\tsb_util.c: OBJ\util_button.c: OBJ\_hbmkaut_demo1.c: Turbo Incremental Link 5.66 Copyright (c) 1997-2002 Borland Error: Unresolved external '___get_std_stream' referenced from C:\MINIGUIBCC77_2506\HARBOUR\LIB\WIN\BCC\HBVMMT.LIB|fm Error: Unresolved external 'SwitchToThisWindow' referenced from C:\MINIGUIBCC77_2506\LIB\MINIGUI.LIB|c_windowsAPI Error: Unresolved external 'PrivateExtractIconsA' referenced from C:\MINIGUIBCC77_2506\LIB\MINIGUI.LIB|c_icon Error: Unresolved external '__itoa' referenced from C:\MINIGUIBCC77_2506\LIB\MINIGUI.LIB|c_winapimisc hbmk2[demo1-ru]: Error: Running linker. 2 Для продолжения нажмите любую клавишу . . . Да и другие тоже. Harbour 3.2.0dev (r2502211016) Copyright (c) 1999-2025, https://harbour.github.io/ D:\TEMP\hbmk_krl4a2.dir\demo.c: D:\TEMP\hbmk_puhvy8.c: Turbo Incremental Link 5.66 Copyright (c) 1997-2002 Borland Error: Unresolved external '___get_std_stream' referenced from C:\MINIGUIBCC77_2506\HARBOUR\LIB\WIN\BCC\HBVM.LIB|fm Error: Unresolved external 'SwitchToThisWindow' referenced from C:\MINIGUIBCC77_2506\LIB\MINIGUI.LIB|c_windowsAPI Error: Unresolved external 'PrivateExtractIconsA' referenced from C:\MINIGUIBCC77_2506\LIB\MINIGUI.LIB|c_icon Error: Unresolved external '__itoa' referenced from C:\MINIGUIBCC77_2506\LIB\MINIGUI.LIB|c_winapimisc hbmk2: Error: Running linker. 2
|
 |

|
|
|
| постоянный участник
|
Пост N: 8055
Зарегистрирован: 12.09.06
|
|
Отправлено: 07.10.25 15:07. Заголовок: https://i.postimg.cc..
Имею построенный ТСБ, все колонки текстовые. Нужно превратить определенную колонку по выбору в числовую и выдать итог в подвале. Проблема, не получается изменить тип колонки. Как это сделать ??? Вот код: aSum[x] := { числа, полученное из текстовой колонки } oCol := oBrw:GetColumn("Col_10") oCNew := oCol:Clone() nPos := 11 oBrw:InsColumn(nPos, oCNew) oCol := oBrw:aColumns[nPos] oCol:cPicture := NIL oCol:cDataType := "N" oBrw:Reset() oBrw:GoTop() FOR nJ := 1 TO oBrw:nLen oBrw:SetValue(nPos,aSum[nJ]) oBrw:Skip(1) NEXT .... oBrw:DelColumn( nPos-1 ) // удалить колонку в таблицу oBrw:DrawFooters() oBrw:Reset() oBrw:Refresh(.T.) // перечитывает данные в таблице oBrw:GoTop() oBrw:SetFocus() DO EVENTS После перерисовки ТСБ - прога падает с ошибкой: Error BASE/2022 Неверный аргумент: ALLTRIM Args: [1] = N 1.00 Called from ALLTRIM(0) Called from (b)EVAL(523) in module: demo.prg Called from TSBROWSE:BDATAEVAL(1993) in module: h_tbrowse.prg Called from TSBROWSE:DRAWSELECT(4795) in module: h_tbrowse.prg Called from TSBROWSE:DRAWSUPER(5054) in module: h_tbrowse.prg Called from TSBROWSE:PAINT(11268) in module: h_tbrowse.prg Called from TCONTROL:HANDLEEVENT(872) in module: TControl.prg Called from TSBROWSE:HANDLEEVENT(9764) in module: h_tbrowse.prg Called from EVENTS(144) in module: h_events.prg Called from DOEVENTS(0) Called from TSB_1COLTRANSF(280) in module: tsb_actions.prg
|
 |

|
|
|
| постоянный участник
|
Пост N: 8056
Зарегистрирован: 12.09.06
|
|
Отправлено: 07.10.25 17:04. Заголовок: Отбой. Код заработал..
Отбой. Код заработал !!!
|
 |

|
|
|
| постоянный участник
|
Пост N: 8057
Зарегистрирован: 12.09.06
|
|
Отправлено: 07.10.25 18:22. Заголовок: Есть отличная функци..
Есть отличная функция в ТСБ - oBrw:FilterFTS( cVal, .T. ) Можно ли такую же сделать для ТСБ с массивом типа oBrw:FilterArr( cVal, .T. ) ? 
|
 |

|
|
Ответов - 25
, стр:
1
2
All
[только новые]
|
|