Re: Line too long ???
- From: Andreas Koch <nospam@xxxxxxxxxxxxxxx>
- Date: Sun, 14 Oct 2007 11:59:46 +0200
Stark wrote:
After copying everuthing in the Notepad, savin the file and renaming it into .pas, it looked all right, but after a few other adjustments to the same lines consisting mainly in lines camcellations, I got in the same intial situation
Mh... perhaps you got some other invalid characters in your source file, too.
Try something like
var
f:tfilestream;
b:array of byte;
x:integer;
begin
f:=tfilestream.creatE('mysource.pas',fmopenread);
setlength(b,f.size+3);
f.read(b[1],f.size);
for x:=1 to f.size do
if (b[x]<32) then
begin
if ((b[x]=13) and (b[x+1]=10)) or ((b[x]=10) and (b[x-1]=13)) then // ok
else showmessage('Found '+inttostr(b[x])+' at '+inttostr(x));
end;
freeandnil(f);
end;
and run it evertime you saved your source.
.
- References:
- Line too long ???
- From: Stark
- Re: Line too long ???
- From: Dr J R Stockton
- Re: Line too long ???
- From: Stark
- Line too long ???
- Prev by Date: buy cheap runescape gold on www.buy-runescape-money.com
- Next by Date: Re: Line too long ???
- Previous by thread: Re: Line too long ???
- Next by thread: Re: Line too long ???
- Index(es):