Proszę o pomoc

[scrobik]

Kod: Zaznacz cały

void __fastcall TForm1::TrackBar4Change(TObject *Sender)
{  Edit5->Text = IntToStr(TrackBar4->Position); // sterowanie

    ramka = IntToStr(TrackBar2->Position ) + IntToStr( TrackBar4->Position<<0);
    Edit8->Text = ramka;
}


Powyższy zdarzenie generuje w polu edit8 tekst :00 kiedy TrackBar są ustawione w pozycji zera(Można pozycję zmieniać w zakresie od 0 do 100). Nie wiem jak zrobić żeby Pole edit8 pokazywało pozycje TrackBar - sformatowane liczby dziesiętne z mniej znaczącymi zerami np. kiedy pozycje są ustawione na zero to ma się wyswietlać 000000 , kiedy są ustawione na 20 to ma się wyświetlać 020020 a teraz wyświetla się 2020. Chodzi o to żeby się wyświetlały te niepotrzebne zera. Dziękuję za pomoc i pozdrawiam.

[polymorphism]

Kod: Zaznacz cały

Edit8->Text = AnsiString().sprintf("%03i%03i", TrackBar2->Position, TrackBar4->Position); 

[Cyfrowy Baron]

Dodam, że to nie musi być tylko AnsiString, gdyż dla UnicodeString będzie niemal identycznie:

Kod: Zaznacz cały

Edit8->Text = UnicodeString().sprintf(L"%03i%03i", TrackBar2->Position, TrackBar4->Position);

Można też z funkcją FormatCurr:

Kod: Zaznacz cały

Edit8->Text = FormatCurr("00#", TrackBar2->Position) + FormatCurr("00#", TrackBar4->Position);