Also ich bin neu hier und wollte mal fragen warum bei meinem Quellcode zum Abspeichern des Stringcodes der Fehler "Illegal Qualifier" auftritt.
Code: Alles auswählen
procedure TBildschirmschoner.FormCreate(Sender: TObject);
Var liste: Tstringlist;
Begin
liste:=Tstringlist.Create;
liste.Add(scrollbar1.Position[0]);
liste.Add(scrollbar2.Position[0]);
liste.Add(scrollbar3.Position[0]);
liste.Add(scrollbar4.Position[0]);
liste.Add(scrollbar5.Position[0]);
liste.Add(scrollbar6.Position[0]);
liste.Add(scrollbar7.Position[0]);
liste.Add(scrollbar8.Position[0]);
liste.Add(scrollbar9.Position[0]);
liste.Add(scrollbar10.Position[0]);
liste.Add(scrollbar11.Position[0]);
liste.Add(scrollbar12.Position[0]);
liste.Add(scrollbar13.Position[0]);
liste.Add(scrollbar14.Position[0]);
liste.Add(scrollbar15.Position[0]);
liste.Add(scrollbar16.Position[0]);
liste.Add(scrollbar17.Position[0]);
liste.Add(scrollbar18.Position[0]);
liste.Add(scrollbar19.Position[0]);
liste.Add(scrollbar20.Position[0]);
liste.Add(scrollbar21.Position[0]);
liste.Add(scrollbar22.Position[0]);
liste.Add(scrollbar23.Position[0]);
liste.Add(scrollbar24.Position[0]);
liste.Add(scrollbar25.Position[0]);
liste.SaveToFile(FileNameEdit1.filename);
liste.Free;
end;
PS: Sorry, dass der Quellcode nicht in sonem Kasten ist, hab nur keine ahnung wie das geht!
PPS: Kann mir i wer sagen wie ich ein Bild in das laufende Progamm einfügen kann? als eigene Bilder einfügen kann? Das soll nen Bildschirmschoner werden.