na delphi nie pomogli

0

Mam trzy sprawy: (pisałem na forum delphi ale tam nikt nie wiedział )

1.) Jak zrobić, żeby w spinedit maxymalna wartośc była taka jak w jakimś pliku txt ( na eof wyskakuje błąd )

2.) Jak sprawdzic czy w lini tekst jest litera F czy P i zależnie od tego coś zrobić.

3.) Jak skopiować pierwszą linię textu bez pierwszej litery. ( z pliku txt do edita).
Bardzo dziękuję za pomoc...

0

odpowiedz na pytanie 2:
If Pos('F', Edit1.Text) = 0 Then //nie ma znaku F

0

var
x: TextFile;
i: Integer;
begin
AssignFile(x, 'ścieżka');
Reset(x);
Read(x, i);
SpinEdit.Max:=i;
CloseFile(x);
end;

var
x: TextFile;
s: string;
begin
AssignFile(x, 'ścieżka');
Reset(x);
Readln(x, s);
Edit1.Text:=Copy(s, 2, 255);
CloseFile(x);
end;

  1. To nie jest 'Goracy temat' - post przenosze.

1 użytkowników online, w tym zalogowanych: 0, gości: 1