Jak pobrać rozdzielczość pliku AVI

2002-03-11 01:52
Mariusz
0

Jak w temacie

Pozostało 580 znaków

2002-03-11 17:48
ql-GORTH
0

A wytłumacz to bardziej sensownie!

Pozostało 580 znaków

2002-03-11 17:55
Marco_99
0

Proponuję użycie Panela na któryym wyświetlasz Avika.

np:
with MediaPlayer1 do
begin
Display := Panel1;
DisplayRect := Panel1.ClientRect;
end;

Następnie zczytaj jego wymiary i wyświetl np: w etykiecie

np:
procedure TForm1.Button1Click(Sender: TObject);
begin
Label1.Caption := IntToStr(Panel1.Width) + ' x ' + IntToStr(Panel1.Height);
end;

Pozdrowienia.
--Marco_99

Pozostało 580 znaków

Liczba odpowiedzi na stronę

1 użytkowników online, w tym zalogowanych: 0, gości: 1, botów: 0