Line Too Long

0

Podczas pisania programu napotkałem pewien problem - po napisaniu jakiejś już tam jego części przy próbie skompilowania wyskoczył mi błąd - Line Too Long (more than 255 characters) w procedurze, OnCreate głównej formy. Po skróceniu nieco kodu przed miejscem gdzie pojawia się błąd wszystko działało dobrze, aż do czasu, kiedy znowu dopisałem nieco kodu (ale już w zupełnie innej procedurze!!!, która nie wykonuje się przy załączaniu programu). Wyskoczył znowu ten sam błąd. Nie pomaga niestety przenoszenie tego kodu do innej procedury (błąd wyskakuje wtedy w tamtej procedurze), czy przypisanie do innego zdarzenia związanego z główną formą typu OnShow, czy OnActivate.
Jest to tym bardziej denerwujący, że kod procedury, który jest przed miejscem pojawienia się błędu to zaledwie kilka linijek.
Poza tym ta linijka wcale nie jest jakaś specjalnie długa (bywają oczywiście znacznie dłuższe, ale przy nich nie wyskakuje żaden bład).Poza tym do momentu w którym się pojawia błąd nie
ma takiego momentu, aby aż tyle znaków (>255) nie było oddzielonych
średnikami. Aby dokładnie to pokazać przytaczam początkowy fragment

tej procedury:

procedure TMainForm.FormActivate(Sender: TObject);
var
y:TPrzebiegGryForm;
dus:integer;
begin
AssignFile(pl,'popraw.sss');
if FileExists('popraw.sss') then
begin
Reset(pl);
poprawnyClose:=true;
if (FileSize(pl)=0) then poprawnyClose:=false;

{jeszcze jakieś inne polecenia}

end;

ostatnia linijka (if (FileSize...) to ta w której pojawia się błąd.

Czym jest spowodowany ten błąd i jak go rozwiązać?

0

Tym, że linia jest za długa :)
Masz taką pionową linię z prawej strony. Staraj się przycinać do niej tekst. Jak maszn np. tak:
if babs then
to możesz zrobić tak
if
babs then

Czasem tak się dzieje przy stringach, jeżeli np. zapomnisz ' postawić na koniec (lub postawisz, ale przez przypadek gdzieś na końcu.
Najłatwiej to zauważyć, gdy się np. w Notatniku otworzy kod i zaznaczy całość. W miejscu, gdzie jest za długa linia będzie cały długi fragment podświetlony.

0

przejedź scrollem na sam koniec lini i sprawdź czy tam nie ma jakichś znaków (wiem że to głupio brzmi, ale ja miałem takie coś dawno temu po jednym resecie kompa), poza tym Co za delphi masz? u mnie spokojnie łapie linijki powyżej 300 znaków!

0

Oj coś mnie nie zrozumieliście chłopaki. Ta linia nie jest za długa (nie ma też żadnego znaku gdzieś tam 1000 spacji dalej). Poradziłem sobie już z tym problemem dzieląc ją na dwie (każda zaledwie po kilka linijek). To niezbyt profesjonalne załatwienie sprawy, no ale cóź?? Poza tym to Delphi 2, ale w innych miejscach spokojnie łapie nawet wspomniane 300 znaków w jednej linii.

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