Выбранный нод - что то типа TreeView1.Selected (не помню точно иерархию).
Как выбрать картинку... ну сделай функцию:
Код:
function GetImgIdxByCbIdx(Idx : Integer) : Integer;
begin
case Idx Of
0 : Result := 11;
1 : Result := 23;
2 : Result := 48;
Else Result := -1; // Default
end;
end;
Ну и используй в OnChange:
Код:
procedure TForm1.ComboBox1Change(Sender : TObject);
begin
if TreeView1.Selected <> Nil Then
TreeView1.ImageIndex := GetImgIdxByCbIdx(ComboBox1.ItemIndex);
end;