Reading artist etc. from a karaokefile ?

[Michael Eriksson]

Hello

I'm absolute beginner with delphi 6.0 so can you please help me with my
problem. I'm trying to make a database of my karaokefiles in kar and
st3-format, so if you know a good way to read the artist and title from the
karaokefile and put them in editboxes let me know...

Thanks
Michael Eriksson (Sweden)

[Michael Eriksson]

I forgot to describe the files...

Following is the beginning of a St3file where I need to have "Never Had A
Dream Come True" in Edit2 and "S Club 7" in Edit1...
STAR DATA V3.00 Never Had A Dream Come True
S Club 7 Michael
Eriksson 1 '
« D-å '´a­ï% ø ó¯tW )þ- '?±aR þ

And here's the beginning of karfile where I need to have "Diana" in Edit2
and "by Paul Anka" in Edit1...
MThd `MTrk ^ ÿ (C)1993 Roland Corporation ÿ A ÿ! ð
A B @ A÷ ÿ! ÿX ÿY ÿQ r? ÿ Diana ÿ/ MTrk + ÿ Soft karaoke
ÿ @KMIDI KARAOKE FILE ÿ/ MTrk é ÿ Words ÿ @LENGL ÿ @TDiana ÿ @Tby
Paul Anka ÿ 4...@T.KAR file by

"Michael Eriksson" <micke_...@hotmail.com> skrev i meddelandet
news:3jEU8.14524$p56.4...@newsb.telia.net...

[Peter Fox]

Following on from Michael Eriksson's message. . .
(1) Look up the specification of the file formats at www.wotsit.org
(2) If they are fixed length records then create a type being a record
with elements that match something like the example below then you can
open the file in binary mode and read a record at a time.

Tmyrec = record
Artist : string[30];
Song : string[40];
Duration : Longint;
end;

(3) If the format uses variable length records then you'll have to parse
the file. There are many ways the records could be packed. You might
just be lucky and find CRLF is the delimiter in which case read the
whole lot into a stringlist (.loadfromfile) and then you should be able
to pick out the bits you want.

>I forgot to describe the files...
>
>Following is the beginning of a St3file where I need to have "Never Had A
>Dream Come True" in Edit2 and "S Club 7" in Edit1...

>STAR DATA V3.00 0
--
PETER FOX Not the same since the e-commerce business came to a .
2 Tees Close, Witham, Essex. pe...@eminent.demon.co.uk
Free Delphi source for developers <http://www.eminent.demon.co.uk/delphi.htm>