1>
Mam StatusBar, a na nim 3 panele. Aby przy Resize formy miały odpowiednie rozmiary w zdarzeniu OnResize wpisuję coś takiego:
[code]
StatusBar.Panels.Items[0].Width := 100;
StatusBar.Panels.Items[1].Width := MainForm.ClientWidth - 230;
StatusBar.Panels.Items[2].Width := 130;[/code]
Wszystko OK. :-) Dobrze.
Na tej samej formie mam 2 RichEdity - jeden pod drugim. Nad RichEditami mam CollBara oraz MainMenu, a pod nimi ProgressBar i StatusBar. Całe wolne miejsce maje zająć RichEdity. Jedem ma zajmować jedną połowę, a drugi drugą połowę. I jest, a ja mam problem z odpowiednimi rozmiarami RichEditów prze Resizie formy ;-|. Kombinuję na różne sposoby, ale nie chce działać ;-( . Ostatnio napisalem w zdarzeniu OnResize formy coś takiego:
[code] RichEditX.Height := MainForm.ClientHeight / 2;
RichEditY.Height := MainForm.ClientHeight / 2;[/code]
Pomyślalem, że skoro coś podobnego działa z panelami StatusBara, to wyjdzie i RichEditami. No, nie udalo się ;-(.
POMÓŻCIE!!!!
2>
wycofane
3>
Znów problem z programem (tym z punktu 1). Wiecie już mniejwięcej jak on wygląda. Problem jest następujący: do pierwszego RichEdita wpisuję tekst, wduszam button na CoolBarze i na drugim RichEdicie pojawia się przekonwertowany tekst. Zdarzenie onClick Buttona wygląda tak:
[code]var
S, Code : String;
I, Len : Integer;
begin
S := Normal.Lines.Text;
Len := Length(S);
for I := 1 to Len do
begin
if (S[i] = 'A') or (S[i] = 'a') then
Code := Code + '±';
// tutaj jeszcze parę takich warunków
end;
RichEditY.Lines.Clear;
RichEditY.SelText := Code;
end;[/code]
Ta pętla zmienia niestety tylko jeden znak na inny. Jak zrobić, by mozna bylo zmienić kilka znaków na inne, np. ±±± na x.
POMÓŻCIE!!!!
4>
wycofane
5>
wycofane
6>
Jak przekonwertować gb na kb, ect.?
POMÓŻCIE!!!!
7>
W jaki sposób odczytac z pliku filmowego wszystkie możliwe informacje o filmie: czas trwania, użyte kodeki rozmiar klatki, itd.
POMÓŻCIE!!!!
8>
wycofane
9>
wycofane
Z góry wszystkim dziękuję!! [cya]
PS
LOFIX i spin mają rację - wczoraj trochę przesadzilem z liczbą wysylanych postów [wstyd] [wstyd] . Sorry [angel]