Hallo,
ich hab mir mal einen kleinen Untertitel Editor zusammen gebastelt.
Funktionen:
- Kann Untertitel bearbeiten (Start/Ende/Text einer Szene veraendern)
- Zeit skalieren.
- Zeit verschieben.
Untertitel-Datei (Textfile):
Zitat:
0
00:00:01,000 --> 00:00:02,000
Text...
...
1
00:00:03,000 --> 00:00:04,000
Text...
...
dafuer habe ich folgenden Typ festgelegt:
Delphi-Quellcode:
Tmystr = string[150];
Tzeit = record
hour : Integer;
min : Integer;
sec : Integer;
mill : Integer
end;
Tsubtitel = Array[1..4] of Tmystr;
Tdatatyp = record
nummer : Integer;
start : Tzeit;
ende : Tzeit;
sub : Tsubtitel;
end;
Tdb = Array[1..2000] of record
data : Tdatatyp;
high : integer;
end;
also viel Spaß damit,
herkulesamstart
Ps.: klar will ich euren Senf dazu hoeren! Vllt auch Kommentare zum meinen Programmierstil(der ja gar keiner ist^^)