|
|
|
Из делфи в С++
|
|||
|---|---|---|---|
|
#18+
Помогите, пожалуйста перевести данный кусок кода из Object Pascal в С++. procedure TForm1.ListView1CustomDrawItem(Sender: TCustomListView; Item: TListItem; State: TCustomDrawState; var DefaultDraw: Boolean); begin with ListView1.Canvas.Brush do begin case Item.Index of 0: Color := clYellow; 1: Color := clGreen; 2: Color := clRed; end; end; end; ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 24.10.2007, 13:58:10 |
|
||
|
Из делфи в С++
|
|||
|---|---|---|---|
|
#18+
Заголовок обработчика стандартрный а дальше: { switch (Item->Index) { case 0: ListView1->Canvas->Brush->Color=clYellow; break; case 1: ListView1->Canvas->Brush->Color=clGreen; break; case 2: ListView1->Canvas->Brush->Color=clRed; break; } } ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 24.10.2007, 14:23:39 |
|
||
|
|
start [/forum/topic.php?fid=57&msg=34891345&tid=2027953]: |
0ms |
get settings: |
9ms |
get forum list: |
14ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
33ms |
get topic data: |
9ms |
get forum data: |
2ms |
get page messages: |
46ms |
get tp. blocked users: |
2ms |
| others: | 216ms |
| total: | 337ms |
| 0 / 0 |
