[Delphi] (9 in 1) - 5

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]

2. Uzyj F1
3. ReplaceString +F1
4. Sa komponenty (np. do zip jest ZLib na tej stronie:> DelphiDownload)
5. 1gb =1024^2Kb
6. W Download ktoś ostatnio wrzucił rozwiazanie...
7. Spróbuj z komponentami MSI, tesh w dziale Download\Komponenty

4> patrz FAQ
8> szukaj na forum - to pytanie powtarza się średnio co 2 tygodnie

A teraz skopiuje Sebka :) FAQ, ARTY, GOTOWCE, FAQ, ARTY, GOTOWCE, FAQ, ARTY, GOTOWCE - czytajcie ludzie :-[

Chłopie wyluzuj, jak zadasz tyle pytań naraz to zwykte nie otrzymasz odpowiedzi na nic.

ale ad1.
Wstaw splitter ustaw align pierwszego richedit i splittera na alTop (colbara chyba też)
a drugiego richedita na alClient.

Chłopie wyluzuj, jak zadasz tyle pytań naraz to zwykte nie otrzymasz odpowiedzi na nic.

Raz za dużo raz za malo - to jak mam pisać [???] ;-|

Po 2 trzy głora, poczekaj na odpowiedzi, i potem następny post.. Wszystko po kolei, bo inaczej ludkom znudzi się odpowiadnie...

<quote>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!!!!

Masz w inspektorze obiektów własciwość Anchors
ustawiając tam true lub false ustawiasz w która strone mają sie komponenty rozciągać

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!!!!

6>
Jak przekonwertować gb na kb, ect.?

?????

7
W jaki sposób odczytac z pliku filmowego wszystkie możliwe informacje o filmie: czas trwania, użyte kodeki rozmiar klatki, itd.

na www.torry.net jest przykład o tym