🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: pl.comp.lang.delphi
Article #345465

Re: Lazarus/Scanline

#345465
From: stchebel
Date: Thu, 22 Dec 2016 07:58
32 lines
2149 bytes
W dniu czwartek, 22 grudnia 2016 07:52:53 UTC+1 użytkownik Piotr S. napisał:
> W dniu 2016-12-21 o 23:32, stchebel@gmail.com pisze:
> > 3) Dalej robię próbę przypisania k:= BezZnarzecja... W D6 kompilacja przechodi bezproblemowo, Lazarus krzyczy podczas kompilacji o niekompatybilnąści Typów (k,P). Tymczasem w D6 wszystko przechodzi na poziomie kompilacji.
> >
> 
> Co to jest "BezZnarzecja"?
> 
> Podaj kompletny kod a nie jakieś urywki.
> 
> P.S.

OK, wygląda to mniej więcej tak:

var

ObrazPodstawowy:TBitMap;
P:PByteArray;
x,y,i:integer;
k:byte;

begin   

ObrazPodstawowy:=TBitmap.Create;
ObrazPodstawowy.LoadFromFile('obrazek.bmp');
y:=0;     
P:=ObrazPodstawowy.ScanLine[y];
i:=0;
k:=P[i];

W ostatnim wierszu Lazarus wywala błąd kompilacji : Incompatible types: got "TbyteArray" expected "Byte".

Tymczasem to samo w D6 przechodzi bez problemu.
Technical Details
Message-ID: <2b47c46c-9581-47d8-9cd7-7e5ae98efd13@googlegroups.com>
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.icm.edu.pl!newsfeed2.atman.pl!newsfeed.atman.pl!goblin3!goblin.stu.neva.ru!news.ripco.com!news.glorb.com!b123no2624175itb.0!news-out.google.com!u18ni10037ita.0!nntp.google.com!b123no2624164itb.0!postnews.google.com!glegroupsg2000goo.googlegroups.com!not-for-mail
References: <3cb50193-7340-46db-b3a2-a9155565d116@googlegroups.com> <o3ft84$6qm$1@news.icm.edu.pl>

Show Full Headers
Complete Article Headers
X-Received: by 10.107.3.73 with SMTP id 70mr2108795iod.77.1482393519687;        Wed, 21 Dec 2016 23:58:39 -0800 (PST)
X-Received: by 10.157.48.39 with SMTP id d36mr803394otc.1.1482393519658; Wed, 21 Dec 2016 23:58:39 -0800 (PST)
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.icm.edu.pl!newsfeed2.atman.pl!newsfeed.atman.pl!goblin3!goblin.stu.neva.ru!news.ripco.com!news.glorb.com!b123no2624175itb.0!news-out.google.com!u18ni10037ita.0!nntp.google.com!b123no2624164itb.0!postnews.google.com!glegroupsg2000goo.googlegroups.com!not-for-mail
Newsgroups: pl.comp.lang.delphi
Date: Wed, 21 Dec 2016 23:58:39 -0800 (PST)
In-Reply-To: <o3ft84$6qm$1@news.icm.edu.pl>
Complaints-To: groups-abuse@google.com
Injection-Info: glegroupsg2000goo.googlegroups.com; posting-host=185.53.155.180; posting-account=67yd9woAAAAHUu8VHyA7Js47M98NE3m3
NNTP-Posting-Host: 185.53.155.180
References: <3cb50193-7340-46db-b3a2-a9155565d116@googlegroups.com> <o3ft84$6qm$1@news.icm.edu.pl>
User-Agent: G2/1.0
MIME-Version: 1.0
Message-ID: <2b47c46c-9581-47d8-9cd7-7e5ae98efd13@googlegroups.com>
Subject: Re: Lazarus/Scanline
From: stchebel@gmail.com
Injection-Date: Thu, 22 Dec 2016 07:58:39 +0000
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit