Общие вопросы программирования в C++Builder

[SilverFish]

В IntraWEB приложении, пытаюсь выравнивать метку в окне браузера. Получаю ошибку: Control IWForm has no parent window

Код

//TStringList * MyListTV; инициировано в другом месте
 
void __fastcall TIWFormTV1::IWTimerTVAsyncTimer(TObject *Sender, TStringList *EventParams)
{
 if(MyListTV)
   {
         if(MyListTV->Count > index)
      {
               IWLabelTV->Caption = ""; //метка
               IWLabelTV->Left = (IWRegion2->Width - IWButtonReturn->Width)/2 -
                                                        Canvas->TextWidth(MyListTV->Strings[index])/2; //проблема
               IWLabelTV->Caption = MyListTV->Strings[index];
              index++;
           }
          if(MyListTV->Count == index)
                     index = 0;
  }
}
 

Как это исправить? Спасибо.

[SilverFish]

Нашла простое решение, для моего случая.

Код

void __fastcall TIWFormTV1::IWTimerTVAsyncTimer(TObject *Sender, TStringList *EventParams)
 
{
 if(MyListTV)
       {
         if(MyListTV->Count > index)
      {
               IWLabelTV->Caption = "";
            IWLabelTV->Visible = false;
           IWLabelTV->Caption = MyListTV->Strings[index];
              IWLabelTV->Left = (IWRegion2->Width - IWButtonReturn->Width)/2 - IWLabelTV->Width/2;
                IWLabelTV->Caption = MyListTV->Strings[index];
              IWLabelTV->Visible = true;
            index++;
           }
          if(MyListTV->Count == index)
                     index = 0;
  }
}
 

[SilverFish]

А как это будет на С++?

Код

function CalcTextWidth(const AText: string; AFont: TFont): Integer;
var
  bmp: TBitmap;
begin
  bmp := TBitmap.Create;
  try
    bmp.Canvas.Font.Assign(AFont);
    Result := bmp.Canvas.TextWidth(AText);
  finally
    bmp.Free;
  end;
end;
 

[volvo877]

Например, так:

Код

int CalcTextWidth(String s, TFont *f)
{
    std::auto_ptrGraphics::TBitmap> bmp(new Graphics::TBitmap);
    bmp->Canvas->Font->Assign(f);
    return bmp->Canvas->TextWidth(s);
}

[SilverFish]

Большое спасибо!