case acol of
  2:begin
      with (aEditLink.GetEditControl as TImagePicker) do
      begin
        BeginUpdate;
        Items.Clear;
        with Items.Add do
        begin
          Caption:='Germany';
          ImageIndex:=0;
        end;
=>>
switch(acol )
{
    case 2:
            TImagePicker *tmpPicker = dynamic_cast<TImagePicker *>(aEditLink.GetEditControl);
             if(tmpPicker != NULL)
             {
                  tmpPicker ->BeginUpdate();
                  tmpPicker ->Items->Clear();
                  tmpPicker ->Items->Add->Caption = "Germany";
              }
    break;
}
.....생략

뭐 이정도로 이해하심이..  대략 작성한거라~~ 그럼
날씨 많이 춥네용..


                 


박철 님이 쓰신 글 :
: 아래와 같은 델파이 소스가 있는데요. 빌더로 변환좀 부탁합니다.
: 특히 "  with (aEditLink.GetEditControl as TImagePicker) do  "
: 부분만 설명 좀 부탁드립니다.
: 그리고 빌더 코드로 하면은요.. 어떻게...
:
:
:
: procedure TForm1.AdvStringGrid1GetEditorProp(Sender: TObject; aCol,
:   aRow: Integer; aEditLink: TEditLink);
: begin
:   case acol of
:   2:begin
:       with (aEditLink.GetEditControl as TImagePicker) do
:       begin
:         BeginUpdate;
:         Items.Clear;
:         with Items.Add do
:         begin
:           Caption:='Germany';
:           ImageIndex:=0;
:         end;
:         with Items.Add do
:         begin
:           Caption:='UK';
:           ImageIndex:=1;
:         end;
:         with Items.Add do
:         begin
:           Caption:='USA';
:           ImageIndex:=2;
:         end;
:         with Items.Add do
:         begin
:           Caption:='Japan';
:           ImageIndex:=3;
:         end;
:         with Items.Add do
:         begin
:           Caption:='Italy';
:           ImageIndex:=4;
:         end;
:         with Items.Add do
:         begin
:           Caption:='France';
:           ImageIndex:=5;
:         end;
:         EndUpdate;
:       end;
:     end;
:   end;
: end;