Herzlich Willkommen in der
DP (wollt ich schon immer mal sagen können

)
Ich nehme an das Programm brauchst du für den Informatik-Unterricht oder so

Also eeigntlich müsstest dus dann selbst lösen, aber ein, zwei ansätze auf die schnelle:
Delphi-Quellcode:
for i := 1 to Length(string) do
begin
if s[i]=' ' then
//weiter darfst du selbst machen :D
sonst wärs ja zuu leicht.
ok ist vielleicht nich der BESTE Weg, andere DPler verzeiht mir