On-line: Haz, гостей 1. Всего: 2 [подробнее..]
АвторСообщение
постоянный участник


Пост N: 420
Зарегистрирован: 13.10.05
ссылка на сообщение  Отправлено: 19.12.13 18:16. Заголовок: TsBrowse в Минигуи (продолжение)



TsBrows определяется в виде строки ПАРМЕТРОВ объекта и их значений
К примеру

 цитата:

DEFINE TBROWSE oBrw2 ;
AT 60,450 ;
ALIAS cAlias ;
OF Form1 ;
WIDTH 330 ;
HEIGHT 340 ;
FONT "Verdana" ;
SIZE 9 ;
ON DBLCLICK CopyRec();
ON GOTFOCUS fModelo_Hab(2) ;
AUTOFILTER ;
CELLED EDIT;
VALUE nRec;
GRID


Здесь я собрал параметры из разных tBrows
Можно или нет и какие парметры заменить
выражением ( и каким) ?
oBrw2:....
oBrw2:....



Спасибо: 0 
ПрофильЦитата Ответить
Ответов - 148 , стр: 1 2 3 4 5 6 7 8 All [только новые]


администратор




Пост N: 4875
Зарегистрирован: 17.05.05
ссылка на сообщение  Отправлено: 05.06.15 17:59. Заголовок: возможно это oBrw:nH..


возможно это oBrw:nHeightCell

Спасибо: 0 
ПрофильЦитата Ответить
постоянный участник




Пост N: 4226
Зарегистрирован: 12.09.06
ссылка на сообщение  Отправлено: 05.06.15 18:04. Заголовок: Dima пишет: возможн..


Dima пишет:

 цитата:
возможно это oBrw:nHeightCell


Точно ! Нашел у себя в коде, добавил 50 и всё показывается !
Спасибо Дима, выручил !

Спасибо: 0 
ПрофильЦитата Ответить
постоянный участник




Пост N: 4235
Зарегистрирован: 12.09.06
ссылка на сообщение  Отправлено: 10.06.15 12:50. Заголовок: Всем привет ! Работа..


Всем привет !
Работаю с Excel из Tbrowse.
// вызов стандартой функции МиниГуи \MiniGUI\SOURCE\TsBrowse\h_tbrowse.prg
&oBrw:Excel2(cFile, lActivate, NIL, "_"+Space(70)+cTitle, lSave )
Как получить высоту строки таблицы и изменить её на нужную ?

Спасибо: 0 
ПрофильЦитата Ответить
администратор




Пост N: 571
Зарегистрирован: 20.02.11
ссылка на сообщение  Отправлено: 10.06.15 13:28. Заголовок: так nHeight := oSh..


так
nHeight := oSheet:Rows(1):RowHeight
oSheet:Rows(1):RowHeight := 40

PS: Правда это касается Excel объекта открытого по OLE

Спасибо: 0 
ПрофильЦитата Ответить
постоянный участник




Пост N: 4236
Зарегистрирован: 12.09.06
ссылка на сообщение  Отправлено: 10.06.15 14:20. Заголовок: А как достучаться до..


А как достучаться до этого oSheet: ?

&oBrw:Excel2(cFile, lActivate, NIL, "_"+Space(70)+cTitle, lSave )
в этой функции Excel2() файл автоматом открывается:
If lActivate
ShellExecute( 0, "Open", If( lSave, cFile, cWork ),,, 3 )
EndIf

Т.е. я к нему доступ уже не имею ?
Как тогда поступить ?



Спасибо: 0 
ПрофильЦитата Ответить
администратор




Пост N: 572
Зарегистрирован: 20.02.11
ссылка на сообщение  Отправлено: 10.06.15 14:22. Заголовок: Andrey пишет: Как т..


Andrey пишет:

 цитата:
Как тогда поступить


не открывать автоматом, а просто сохранять
сохраненный файл открыть олей

Спасибо: 0 
ПрофильЦитата Ответить
постоянный участник




Пост N: 4237
Зарегистрирован: 12.09.06
ссылка на сообщение  Отправлено: 10.06.15 14:35. Заголовок: Спасибо Haz ! :sm20..


Спасибо Haz !

Там еще есть интересный метод ExcelOle(). Буду пробовать его....

Спасибо: 0 
ПрофильЦитата Ответить
администратор




Пост N: 573
Зарегистрирован: 20.02.11
ссылка на сообщение  Отправлено: 10.06.15 15:16. Заголовок: Andrey пишет: Там е..


Andrey пишет:

 цитата:
Там еще есть интересный метод ExcelOle()



Интересен в нем подход, позволяющий существенно ускорить вывод. Сам по себе ОLE сильно задумчивый если по одной ячейке обрабатывать , этот метод работает блоками, т.е. за один вызов оля обрабатывает много ячеек.
В остальном - обычная работа через олю



Спасибо: 0 
ПрофильЦитата Ответить
Ответов - 148 , стр: 1 2 3 4 5 6 7 8 All [только новые]
Ответ:
1 2 3 4 5 6 7 8 9
большой шрифт малый шрифт надстрочный подстрочный заголовок большой заголовок видео с youtube.com картинка из интернета картинка с компьютера ссылка файл с компьютера русская клавиатура транслитератор  цитата  кавычки моноширинный шрифт моноширинный шрифт горизонтальная линия отступ точка LI бегущая строка оффтопик свернутый текст

показывать это сообщение только модераторам
не делать ссылки активными
Имя, пароль:      зарегистрироваться    
Тему читают:
- участник сейчас на форуме
- участник вне форума
Все даты в формате GMT  3 час. Хитов сегодня: 442
Права: смайлы да, картинки да, шрифты да, голосования нет
аватары да, автозамена ссылок вкл, премодерация откл, правка нет