Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / PowerBuilder [игнор отключен] [закрыт для гостей] / Выделение ряда строк / 7 сообщений из 7, страница 1 из 1
26.04.2006, 13:58
    #33691700
Fahrenheit
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Выделение ряда строк
Уважаемые камрады.
Подскажите, как реализовать в DW выделение нескольких строк сразу: по Ctrl - отдельные строки по клику, по Shift - рейндж от клика до клика? Как потом определить, какие именно строки выделены?
...
Рейтинг: 0 / 0
26.04.2006, 14:06
    #33691753
ЗоринАндрей
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Выделение ряда строк
FahrenheitУважаемые камрады.
Подскажите, как реализовать в DW выделение нескольких строк сразу: по Ctrl - отдельные строки по клику, по Shift - рейндж от клика до клика? Как потом определить, какие именно строки выделены?pfcdwsrv.pbl -> pfc_n_cst_dwsrv_rowselection
style = extended.
...
Рейтинг: 0 / 0
26.04.2006, 14:26
    #33691850
Fahrenheit
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Выделение ряда строк
Каюсь сразу, PFC у меня нет.
Собственно и вопрос встречный сразу: а есть такая PFC для 10-го PB?
...
Рейтинг: 0 / 0
26.04.2006, 14:35
    #33691887
ЗоринАндрей
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Выделение ряда строк
FahrenheitКаюсь сразу, PFC у меня нет.
Собственно и вопрос встречный сразу: а есть такая PFC для 10-го PB?

codexchange
...
Рейтинг: 0 / 0
26.04.2006, 15:32
    #33692115
Fahrenheit
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Выделение ряда строк
Благодарствую. Буду разбираться.
...
Рейтинг: 0 / 0
27.04.2006, 11:56
    #33693895
ChV
ChV
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Выделение ряда строк
Можно "повесить" для обработки события Clicked :
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
Long lRow,lStartRow,lEndRow,lFocusRow
	if Row> 0  then
			if KeyDown(KeyControl!) then
					if this.IsSelected(Row) then
							this.SelectRow (Row,False)
					else
							this.SelectRow (Row,True)
					end if
					lFocusRow=Row
			elseif KeyDown(KeyShift!) then
					this.SetRedraw(False)
					this.SelectRow ( 0 ,False)
					lStartRow=this.GetRow()
					lEndRow=Row
					if lEndRow<lStartRow then
							for lRow=lStartRow to lEndRow Step - 1 
									this.SelectRow (lRow,True)
							next	
							lFocusRow=lStartRow
					else
							for lRow=lStartRow to lEndRow
									this.SelectRow (lRow,True)
							next	
							lFocusRow=lEndRow
					end if
					this.SetRedraw(True)
			else
					this.SelectRow ( 0 ,False)
					this.SelectRow (Row,True)
					lFocusRow=Row
			end if
			this.SetRow(lFocusRow)
	end if

...
Рейтинг: 0 / 0
27.04.2006, 13:55
    #33694429
Riska
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Выделение ряда строк
DW event clicked:f_select_rows (This, row, ii_last_click)

f_select_rows (adw - datawindow, ai_row - integer, ai_last_click - integer[reference]):
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
long ll_i
boolean lb_result
// integer ii_last_click - instance variables in the window.

IF ai_row <  1  THEN RETURN

IF KeyDown(KeyControl!) THEN
	ai_last_click = ai_row
	lb_result = adw.IsSelected(ai_row)
	IF lb_result THEN
		adw.SelectRow(ai_row, FALSE)
	ELSE
		adw.SelectRow(ai_row, TRUE)
	END IF
ELSEIF KeyDown(KeyShift!) THEN
	IF ai_last_click < ai_row THEN
		FOR ll_i = ai_last_click TO ai_row
			adw.SelectRow(ll_i, TRUE)
		NEXT
	ELSEIF ai_last_click > ai_row THEN
		FOR ll_i = ai_last_click TO ai_row STEP - 1 
			adw.SelectRow(ll_i, TRUE)
		NEXT
	END IF
ELSE
	ai_last_click = ai_row
	adw.SelectRow( 0 , FALSE)
	adw.SelectRow(ai_row, TRUE)
END IF
...
Рейтинг: 0 / 0
Форумы / PowerBuilder [игнор отключен] [закрыт для гостей] / Выделение ряда строк / 7 сообщений из 7, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]