Вверх ↑
Этот топик читают: Гость
Разработчик
Ответов: 26170
Рейтинг: 2127
#16: 2011-02-25 09:08:17 ЛС | профиль | цитата
hitman249 писал(а):
таблица здесь никчему

Да будет тебе известно, что модули без таблицы не работают, а в таблице надо еще включить кое-какие параметры. Утверждение, что у тебя чего-то не работает, при таком уровне тестового примера, ровно ничего не значат
карма: 22

0
Ответов: 1528
Рейтинг: 57
#17: 2011-02-25 09:11:56 ЛС | профиль | цитата
вот, сам список и драв манагер к нему
code_22676.txt
карма: 0

0
файлы: 1code_22676.txt [703B] [166]
Разработчик
Ответов: 26170
Рейтинг: 2127
#18: 2011-02-25 09:16:49 ЛС | профиль | цитата
hitman249, ты уже запарил, ты можешь это свести все в одну схему, или тебе в падлу
карма: 22

0
Ответов: 1528
Рейтинг: 57
#19: 2011-02-25 09:45:32 ЛС | профиль | цитата
nesco, шипко здоровая схема...
------------ Дoбавленo в 09.41:
проверил, действительно. В MTStrTbl проблема, немогу понять в чём именно, вроде уже всё перетыкал)
------------ Дoбавленo в 09.45:
Add(MainForm,8978481,56,112)
{
Width=398
Height=376
link(onCreate,1976442:doEnum,[])
}
Add(StrList,4383086,98,56)
{
Strings=#22:Иван;Иванов;Иванович;0|26:Андрей;Андреев;Андреевич;0|
}
Add(ArrayEnum,1976442,112,126)
{
link(onItem,16356153:doMT,[])
link(Array,4383086:Array,[])
}
Add(MST_RowAction,15395190,210,119)
{
MSTControl="MTStrTbl"
}
Add(MT_String,16356153,161,119)
{
link(onResult,15395190:doRowAction,[])
}
Add(PointHint,5981647,49,175)
{
Info=#43:Пример вставки строки в определенный индекс|
Transparent=0
VAlign=0
Width=253
Height=179
}
Add(MST_RowAction,8879145,252,308)
{
Action=1
MSTControl="MTStrTbl"
}
Add(Label,14685317,168,203)
{
Top=175
Width=88
Height=17
Caption="Вставить строку"
}
Add(Edit,14198201,168,252)
{
Left=165
Top=175
Width=75
Text="Папин"
}
Add(Label,1507503,98,203)
{
Left=315
Top=175
Width=10
Height=17
Caption="в"
}
Add(Edit,7221313,77,252)
{
Left=325
Top=175
Width=20
Text="1"
}
Add(Label,16139651,56,203)
{
Left=350
Top=175
Width=40
Height=17
Caption="индекс"
}
Add(Edit,4347667,126,252)
{
Left=90
Top=175
Width=75
Text="Папа"
}
Add(Edit,5289316,210,252)
{
Left=240
Top=175
Width=75
Text="Папович"
}
Add(Button,15646096,77,308)
{
Top=195
Width=390
Caption="Вставить"
link(onClick,6302030:doAdd,[])
}
Add(MT_AddData,6302030,119,308)
{
Count=5
link(onAdd,8879145:doRowAction,[])
link(Data1,7221313:Text,[(125,296)(83,296)])
link(Data2,4347667:Text,[])
link(Data3,14198201:Text,[(139,290)(174,290)])
link(Data4,5289316:Text,[(146,296)(216,296)])
link(Data5,9086595:Value,[(153,301)(258,301)])
}
Add(MST_RowAction,16589432,511,308)
{
Action=2
MSTControl="MTStrTbl"
}
Add(Label,6236302,455,203)
{
Top=215
Width=91
Height=17
Caption="Заменить строку"
}
Add(Edit,12722254,434,252)
{
Left=165
Top=215
Width=75
Text="Папин"
}
Add(Label,12354997,385,203)
{
Left=315
Top=215
Width=10
Height=17
Caption="в"
}
Add(Edit,8837610,343,252)
{
Left=325
Top=215
Width=20
Text="2"
}
Add(Label,10030329,343,203)
{
Left=350
Top=215
Width=40
Height=17
Caption="индекс"
}
Add(Edit,15131224,392,252)
{
Left=90
Top=215
Width=75
Text="Папа"
}
Add(Edit,2919316,476,252)
{
Left=240
Top=215
Width=75
Text="Папович"
}
Add(Button,9888182,343,308)
{
Top=235
Width=390
Caption="Заменить"
link(onClick,11175971:doAdd,[])
}
Add(MT_AddData,11175971,385,308)
{
Count=5
link(onAdd,16589432:doRowAction,[])
link(Data1,8837610:Text,[(391,296)(349,296)])
link(Data2,15131224:Text,[])
link(Data3,12722254:Text,[(405,291)(440,291)])
link(Data4,2919316:Text,[(412,296)(482,296)])
link(Data5,14561741:Value,[(419,301)(524,301)])
}
Add(PointHint,15576856,315,175)
{
Info=#44:Пример замены строки с определенным индексом|
Transparent=0
VAlign=0
Width=253
Height=179
}
Add(Button,6514146,63,441)
{
Top=275
Width=390
Caption="Удалить"
link(onClick,1928936:doData,[])
}
Add(Label,14714967,168,392)
{
Left=350
Top=255
Width=40
Height=17
Caption="индекс"
}
Add(Edit,2762966,119,392)
{
Left=325
Top=255
Width=20
Text="0"
}
Add(MST_RowAction,6086742,168,441)
{
Action=3
MSTControl="MTStrTbl"
}
Add(DoData,1928936,119,441)
{
link(onEventData,6086742:doRowAction,[])
link(Data,2762966:Text,[])
}
Add(PointHint,12412199,49,357)
{
Info=#46:Пример удаления строки с определенным индексом|
Transparent=0
VAlign=0
Width=253
Height=151
}
Add(Button,15364452,343,462)
{
Top=320
Width=390
Caption="Изменить цвет строки"
link(onClick,1224395:doAdd,[])
}
Add(ColorBox,1200809,434,399)
{
Left=45
Top=295
Width=110
Height=21
TypeListColors=1
DefColor=128
}
Add(ColorBox,13832279,476,399)
{
Left=210
Top=295
Width=110
Height=21
DefColor=15780518
}
Add(Label,1886561,518,399)
{
Left=350
Top=295
Width=40
Height=17
Caption="индекс"
}
Add(Edit,11537864,392,399)
{
Left=325
Top=295
Width=20
Text="0"
DataType=2
}
Add(Label,1341390,518,462)
{
Left=5
Top=295
Width=32
Height=17
Caption="текст"
}
Add(Label,1113602,343,399)
{
Left=165
Top=295
Width=39
Height=17
Caption="строка"
}
Add(MST_RowAction,10547525,434,462)
{
Action=5
MSTControl="MTStrTbl"
link(onChange,13664548:doRedraw,[])
}
Add(MT_AddData,1224395,392,462)
{
Count=3
link(onAdd,10547525:doRowAction,[])
link(Data1,11537864:Text,[])
link(Data2,1200809:Index,[(405,446)(447,446)])
link(Data3,13832279:CurrentColor,[(412,451)(482,451)])
}
Add(RedrawManager,13664548,476,462)
{
ControlManager="MTStrTbl"
}
Add(PointHint,14798670,315,364)
{
Info=#53:Пример изменения цвета строки с определенным индексом|
Transparent=0
VAlign=0
Width=253
Height=144
}
Add(Memory,14561741,518,252)
{
Default=Integer(0)
}
Add(Memory,9086595,252,252)
{
Default=Integer(0)
}
Add(MTStrTbl,12853445,259,98)
{
Width=392
Height=168
Color=0
Font=[Arial,11,0,65280,204]
Ctl3D=1
WinStyle=1
Name="MTStrTbl"
Columns=#4:№=40|14:Композиция=260|8:Время=40|12:Состояние=30|
FlatScroll=1
ColumnClick=1
Style=4
MultiSelect=0
Point(onMouseEnter)
Point(onSelect)
Point(onDblClick)
AddHint(-60,-28,59,13,Name)
}
карма: 0

0
Разработчик
Ответов: 26170
Рейтинг: 2127
#20: 2011-02-25 10:22:17 ЛС | профиль | цитата
hitman249, а вот теперь внятно и по пунктам, что надо получить
И что ты мне не часть своей схемы выложил, а почти целиком из справки
карма: 22

0
Гость
Ответов: 17029
Рейтинг: 0
#21: 2011-02-25 10:27:52 правка | ЛС | профиль | цитата


Редактировалось 2 раз(а), последний 2025-01-09 22:34:50
карма: 0

0
Разработчик
Ответов: 26170
Рейтинг: 2127
#22: 2011-02-25 10:47:46 ЛС | профиль | цитата
hitman249, при инициализации таблицы, под цвет надо инициализировать параметр. Те, добавить еще один столбец в строки инициализации. Заметь, в исходном примере в строке 4-е параметра, последний из них 0, а столбцов в строке -- 3
------------ Дoбавленo в 10.47:
О! sla8a отписался уже
Все правильно
178.123.56.230 писал(а):
Иван;Иванов;Иванович;0;0

это как раз то, о чем я и писал
карма: 22

1
Голосовали:hitman249
Ответов: 16884
Рейтинг: 1239
#23: 2011-02-25 11:01:04 ЛС | профиль | цитата
nesco, разница в том, что
hitman249 писал(а):
В MTStrTbl проблема, немогу понять в чём именно, вроде уже всё перетыкал)
, а
178.123.56.230 писал(а):
ColorItems - включить поддержку цвета ячеек = False
Первый "тыкает", а второй включает
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Гость
Ответов: 17029
Рейтинг: 0
#24: 2011-02-25 11:15:04 правка | ЛС | профиль | цитата


Редактировалось 2 раз(а), последний 2025-01-09 22:34:50
карма: 0

0
Ответов: 1528
Рейтинг: 57
#25: 2011-02-25 12:19:02 ЛС | профиль | цитата
а что если нужен цвет не из стандартных ( например 0x00FC7C ) ?
выделять можно любым, но как возвратить назад такой цвет ?
карма: 0

0
Разработчик
Ответов: 26170
Рейтинг: 2127
#26: 2011-02-25 12:26:08 ЛС | профиль | цитата
hitman249 писал(а):
а что если нужен цвет не из стандартных ( например 0x00FC7C )

Только для ячейки применим любой цвет, для текста только 16-ть цветов можно оперативно установить для каждой ячейки, или лбой цвет текста для всей таблицы. Связано это с ограничением в 32 бита, из которых 24 бита занимает цвет ячейки, 4 бита отводится под индексы цвета текста и 4 бита -- системные. Пока не предполагалось увеличивать количество индексов цвета текста, и, тем более, применть 24 битный цвет для цвета текста
карма: 22

0
Ответов: 1528
Рейтинг: 57
#27: 2011-02-25 12:32:09 ЛС | профиль | цитата
nesco писал(а):
или любой цвет текста для всей таблицы

ну вот я присмотрел компонент, но выделенные строки всёравно остаются выделенными, хотя список цвет меняет
code_22679.txt
карма: 0

0
файлы: 1code_22679.txt [143B] [201]
Разработчик
Ответов: 26170
Рейтинг: 2127
#28: 2011-02-25 12:44:50 ЛС | профиль | цитата
hitman249 писал(а):
ну вот я присмотрел компонент

Этот компонент устанавливает цвет всей таблицы и для конкретной ячейки не подходит
------------ Дoбавленo в 12.44:
hitman249, да объясни ж ты наконец -- что тебе конкретно надо
карма: 22

0
Ответов: 1528
Рейтинг: 57
#29: 2011-02-25 12:50:51 ЛС | профиль | цитата
nesco писал(а):
что конкретно надо

это плейлист
при начале проигрывания требуется выделить строку, перед выделением следующей строки перерисовать все строки в выбранный пользователем цвет и т.д. Продолжать по кругу те же действия при проигрывании каждой песни
карма: 0

0
Гость
Ответов: 17029
Рейтинг: 0
#30: 2011-02-25 13:00:17 правка | ЛС | профиль | цитата


Редактировалось 2 раз(а), последний 2025-01-09 22:34:51
карма: 0

0
Сообщение
...
Прикрепленные файлы
(файлы не залиты)