dwa pytania (spinEdit, Save Dialog)

Od pewnwgo czasu tworze edytor www, wychodzi mi on całkiem dobrze. Ale niestety nie mogę sobi poradzić z dwoma problemami.

1. Powiedzmy mam na formie komponent SpinEdit, chcę aby po kliknięciu na button zostało do memo dodane, tyle lini z tekstem ile ustawiłem w Spinedit( liczba spinedit to liczba lini). Wiem że można to osiągnąć petlami, ale jak?

2. Używam SaveDialog, ustawiam <font color="red">filter</span> na *.html, ale program nie zapisuje w *.html tylko w jakimś innym pliku.

Z góry dziękuje za odpowiedzi!!! [cya]

1. To są podstawy(umiejętność korzystania z pętelek)

procedure TForm1.Button1Click(Sender: TObject);
var
i:integer
Begin
for i := 0 to spinedit1.value do
begin
memo1.lines.add('jakis tekst');
end;
end;

czy o to chodziło

2. Używam SaveDialog, ustawiam <font color="red">filter</span> na *.html, ale program nie zapisuje w *.html tylko w jakimś innym pliku.

SaveDialog w ObjectInspector ..własciwość Default EXT. wpisz html..

własciwość Default EXT. wpisz html..

raczej htm

cytat z helpu: Extensions longer than three characters are not supported.

Mi tam nawet pięcioliterowe exty działają.

Filters są zapisane jako TStrings, jest jeszcze FilterIndex. Kombinując to można na prawdę działający prog zrobić