Re: [Lazarus] TFrame improvements

[Martin Frb via lazarus]

On 30/11/2021 00:27, Juha Manninen via lazarus wrote:
On Mon, Nov 29, 2021 at 11:14 PM Ondrej Pokorny via lazarus 
 wrote:


On 29.11.2021 17:18, Juha Manninen via lazarus wrote:

The commit message is not perfect but the committed code is, now
that I fully understand the issue.


That is nonsense. I reverted your change. The code user code is
just plain wrong and your change in TFrame doesn't change anything
about it.

No, the code is valid although not recommended. Accessing Canvas 
outside Paint works with some widgetsets and then an exception is wrong.




There are 2 (or 3) question.

1) Is the fix correct: Yes (if 2 or 3), otherwise "not applicable"

2) Is it a bug in first? (and therefore is a fix needed): No.
No (at least if it is at runtime) it is not a bug, because it is by 
design that a frame needs a form as parent.


3) Before the patch, ignoring the design time issues => did it work at 
runtime? (And is it indented to?)
When (without the patch) the stream is read at runtime, and the frame is 
embedded in a Form, does the example code then work?
Basically, will at runtime the parent be set, before any properties are 
loaded?

(Or, Is that documented that it should?)

=> *If* this works at runtime (and if this is by intention), then there 
is a bug in the designer, in that the designer fails to set the parent 
(parent = designer) in time.


I have not tested the example from the bug. But I did a quick debug of a 
TFrame being loaded, at runtime:
- The TFrame is loading twice from lfm (the frames own lfm, and the 
changeds stored in the form)

-- the first loading, there is no parent set => so it would/could fail.
-- the 2nd loading, there is a parent

The exact "expected" (not tested) behaviour for the app from the bug 
would be:
- If the offending property has a default, and is not changed from the 
default => all good, property is not set during TReader
- If the default is changed in the Frame's lfm => crash, because the 
property is set, when there is no parent.
- if the default is only changed for the frame's instance on the form 
(stored in the form's lfm) => ok


So IMHO it is save to say, that this is not supported at runtime either.
Should it be? IMHO not, see below.

---
This leaves improving the designer, to add a better error message, and 
handle it more gracefully.



---

Otherwise Ondrej is right that code accessing the handle (and that 
includes canvas) must do checks.

And TFrame is not the only place were it this is needed.

  b := TPanel.Create(Form1);
  a := TGraphicControl.Create(b);

  //a.Parent := b;
  //b.Parent := Form1;

  a.Canvas.Line(1,1,2,2);

You must set both parents, or it crashes.
-- 
___
lazarus mailing list
lazarus@lists.lazarus-ide.org
https://lists.lazarus-ide.org/listinfo/lazarus

Re: [Lazarus] New Synthwave Demo

[Alexey Tor. via lazarus]

quote: This demo evokes the style of the 1980s synthwave music culture 
using Free Pascal.


I don't remember that synthwave culture. I lived in the damned communist 
USSR at 1980's, we did not have any synthwave. Only soviet music (==by 
60% it's bad copied western music) + some (not all) hits from the west 
(Abba, Beatles, some rocks bands, not much, some Italian singers). Lack 
of hardware to play the music. Some ppl had the vanilla players, some 
had audio-casette players, my family did have only vanilla player, later 
we got soviet auto-casette player, and I asked my family to bye me ONE 
auto-casette per month, they were expensive. And we had queues, queues 
in the grocery shops 'UniverSams'. Shops which lacked many required food 
products (meat was rare, fish was appeared even more rare).


In the childhood, we were teached at the schools about the doings of 
'grandfather Lenin', the mass murderer of early USSR. In 2010-2020s, we 
are teached about the doings of Stalin, the mass murderer of 1930-1953. 
He ruled after Lenin. This is damned country.



On 30.11.2021 02:33, Anthony Walter via lazarus wrote:
On this page  is 
the video and source code of the project.


--
Alexey

-- 
___
lazarus mailing list
lazarus@lists.lazarus-ide.org
https://lists.lazarus-ide.org/listinfo/lazarus

Re: [Lazarus] TFrame improvements

[Juha Manninen via lazarus]

On Mon, Nov 29, 2021 at 11:14 PM Ondrej Pokorny via lazarus <
lazarus@lists.lazarus-ide.org> wrote:

> That is nonsense. I reverted your change. The code user code is just plain
> wrong and your change in TFrame doesn't change anything about it.
>
> Try e.g. :
>
> procedure TForm1.Button1Click(Sender: TObject);
> var
>   grid: TNewGrid;
> begin
>   grid := TNewGrid.Create(Self);
>   grid.MyProperty := 1; // exception
> end;
>
> Btw. Delphi behaves the same.
>
Of course your example code throws an exception because the grid has no
Parent. Assign a Parent after creation and it works.
Your example shows that you don't understand the issue at all! The problem
was not the grid's parent but the Frame's parent. The grid's parent is
requested, it is there, then its parent's parent is requested. The Frame
has no Parent by definition at design time -> exception.

My fix is 100% correct. Calling it nonsense and reverting it was not nice.
Please restore it. You can fix the commit message at the same go. It must
go to 2.2, too. One less bug in the release.

There is one alternative solution. If you are right and the component
behaves wrong, then an exception must be thrown when it is placed on a Form
as well.
Now the behavior is inconsistent and buggy.
I personally don't see why component authors should be punished with such
an exception. If the component does not work, it will be evident by other
means.


@Martin:
> 2) Is it a bug in first? (and therefore is a fix needed): No.
> No (at least if it is at runtime) it is not a bug, because it is by
design that a frame needs a form as parent.

Why you play dummy now? You know the problem happens at design time, not
runtime.
The exception happened only because the code required a Frame to have a
Parent which BY DEFINITION it does not have at design time under the
default designer.
The correct fix is to NOT require a Frame to have a Parent, which I did in
my commit.

> 3) Before the patch, ignoring the design time issues => did it work at
runtime? (And is it indented to?)

Yes, at runtime it works on both a Form and a Frame.
At design time it works on a Form but crashes on a Frame which is clearly a
bug. Agree?

I wrote about a hypothetical situation where a Frame stands alone at
runtime. It obviously does not happen with the current TFrame. I meant that
my fix is logically correct also if somebody derives a *SuperFrame* for
whatever reason for extra capabilities. The frame's params would still be
right then.

Yes, the error message is confusing.
 "*NewGrid1.MyProperty: Control '' has no parent window*" while it actually
came recursively from the Frame.Parent.
Maybe it confused Ondrej's head. It confused mine initially, and Flávio
Etrusco's (see his comment).
Now that I understand the issue, my fix clearly was the right one.

Regards,
Juha
-- 
___
lazarus mailing list
lazarus@lists.lazarus-ide.org
https://lists.lazarus-ide.org/listinfo/lazarus

Re: [Lazarus] New Synthwave Demo

[Anthony Walter via lazarus]

Here you go:

https://en.wikipedia.org/wiki/Synthwave

Also this:

https://duckduckgo.com/?q=synthwave&iax=images&ia=images
-- 
___
lazarus mailing list
lazarus@lists.lazarus-ide.org
https://lists.lazarus-ide.org/listinfo/lazarus

[Lazarus] Moved to DEV list // Re: TFrame improvements

[Martin Frb via lazarus]

On 30/11/2021 11:18, Juha Manninen via lazarus wrote:


Yes, at runtime it works on both a Form and a Frame.
At design time it works on a Form but crashes on a Frame which is 
clearly a bug. Agree?



No, at runtime it crashes too.

Of course, if you take the attached zip, you will not see this.

Because the Frame is not actually used in TForm1 => so at run time the 
frame is never loaded.


If you manage to get the frame on form1 then it crashes too.
-- 
___
lazarus mailing list
lazarus@lists.lazarus-ide.org
https://lists.lazarus-ide.org/listinfo/lazarus

Re: [Lazarus] New Synthwave Demo

[Juha Manninen via lazarus]

On Tue, Nov 30, 2021 at 10:46 AM Alexey Tor. via lazarus <
lazarus@lists.lazarus-ide.org> wrote:

> This is damned country.
>
Russia was damned then. Now the western world, meaning North America,
Australia and EU, follows the same steps. Dissidents and Christian people
are persecuted. There is segregation with special "passports". The
constitution is dumped and broken constantly by corrupt politicians.
Production and delivery channels are sabotaged, finally leading to food
shortage and chaos.
Australia already has concentration camps where the army is moving people
against their will, and there is genocide of their indigenous people.
Europe is following step by step. See what happens in Austria. Germany
has promised similar restrictions.
Russia now has better freedom of speech than my country Finland. An
example: A video platform TokenTube executes freedom of speech as our laws
define it. It was censored and shut down from the internet without an
explanation. It came back using servers in Russia or in China (not sure
which). See, people in Finland must now rely on Russia or China for their
freedom of speech.
Our new VKK party and its resistance has drawn attention also in Australia.
 https://tokentube.net/v/1598697905/Australia-haastatteli-Ilkka-Tiaista
Something must be done!
The plandemic is used as an excuse. I hope everybody now understands it is
a scam.
A request for everybody: Do not take the jabs. If you took already, don't
take more. It would be unfortunate if the small Pascal community got
reduced by their effects.
In a year or so a new plandemic will come, most likely Marburg. Things will
get worse before they get better.

Sorry for being out of topic on a Pascal programming list. I am happy to
exchange more information in personal mails or by other means.

Regards,
Juha
-- 
___
lazarus mailing list
lazarus@lists.lazarus-ide.org
https://lists.lazarus-ide.org/listinfo/lazarus

Re: [Lazarus] New Synthwave Demo

[Bart via lazarus]

On Tue, Nov 30, 2021 at 12:40 PM Juha Manninen via lazarus
 wrote:

> A request for everybody: Do not take the jabs. If you took already, don't 
> take more. It would be unfortunate if the small Pascal community got reduced 
> by their effects.
> In a year or so a new plandemic will come, most likely Marburg. Things will 
> get worse before they get better.
>

As someone who works in healthcare I feel rather offended by you now.
Covid-19 is a real thing, real people are dying under my hands right now.

A Marbug pandemic most likely will kill 90% of the earths population
if it could travle unrestricted around the world
The virus however is so effective in killing us (and it dos that
really fast), that at some point it kills all vectors (=us humans), in
it's vicinity so the spread stops before the vector reaches other
possible victims.

Sorry for being off-topic as well.
I won't reply any further to this thread.
-- 
Bart
-- 
___
lazarus mailing list
lazarus@lists.lazarus-ide.org
https://lists.lazarus-ide.org/listinfo/lazarus

Re: [Lazarus] New Synthwave Demo

[Juha Manninen via lazarus]

Now people are dying because of the jabs. Those are not side-effects, the
jabs work as intended.
I am more and more convinced there is no SARS-CoV-2 virus. It has not been
isolated from any patient during the 2 year "pandemic". Why?
The only reliable measure of a pandemic is the total number of deaths
compared to earlier years. There has been no increase in deaths in almost
anywhere (*) so far. In this winter we will see an increase because of the
jabs' effects ... and the new Omicron variant is blamed of course. It was
all planned a long ago. How are the variants detected, anyone? Even the
original virus has not been isolated and the PCR tests give mostly false
positives.
In a Marbug plandemic (or similar) symptoms will be imposed by the
"booster-shots" and a new virus will be blamed. It will not be about a real
virus then either.
The agenda behind the plandemic is much worse than most people realize.
Wake up please. This scam can be stopped only if enough people raise to
oppose it. Don't put diapers on your face, don't consent to segregation
passports etc.

Juha

(*) The few exceptions, Italy, Spain, some US cities, in early 2020 can be
explained.
-- 
___
lazarus mailing list
lazarus@lists.lazarus-ide.org
https://lists.lazarus-ide.org/listinfo/lazarus

Re: [Lazarus] New Synthwave Demo

[Gordon Findlay via lazarus]

Juha:

Your mails containing so many lies, and so dangerous to the community,
means that I will cease being a member of the mailing list.



On Wed, Dec 1, 2021 at 8:12 AM Juha Manninen via lazarus <
lazarus@lists.lazarus-ide.org> wrote:

> Now people are dying because of the jabs. Those are not side-effects, the
> jabs work as intended.
> I am more and more convinced there is no SARS-CoV-2 virus. It has not been
> isolated from any patient during the 2 year "pandemic". Why?
> The only reliable measure of a pandemic is the total number of deaths
> compared to earlier years. There has been no increase in deaths in almost
> anywhere (*) so far. In this winter we will see an increase because of the
> jabs' effects ... and the new Omicron variant is blamed of course. It was
> all planned a long ago. How are the variants detected, anyone? Even the
> original virus has not been isolated and the PCR tests give mostly false
> positives.
> In a Marbug plandemic (or similar) symptoms will be imposed by the
> "booster-shots" and a new virus will be blamed. It will not be about a real
> virus then either.
> The agenda behind the plandemic is much worse than most people realize.
> Wake up please. This scam can be stopped only if enough people raise to
> oppose it. Don't put diapers on your face, don't consent to segregation
> passports etc.
>
> Juha
>
> (*) The few exceptions, Italy, Spain, some US cities, in early 2020 can be
> explained.
>
> --
> ___
> lazarus mailing list
> lazarus@lists.lazarus-ide.org
> https://lists.lazarus-ide.org/listinfo/lazarus
>
-- 
___
lazarus mailing list
lazarus@lists.lazarus-ide.org
https://lists.lazarus-ide.org/listinfo/lazarus

Re: [Lazarus] New Synthwave Demo

[Dave H via lazarus]

Ya know, I don't post here often, but I have lost friends to this virus
and I am getting really PO'd that the virus has become so political that
it's infected this list, which I usually find most valuable. 


I'm 65 and getting ready to retire. I have no teeth. I lost my teeth as
an adult because I had the measles in 1963, when I was in first grade,
before a vaccine was available. The high temperature I ran for over a
week baked the enamel off my then forming permanent teeth, and as a
consequence I lost all of them by the time I was 30. I consider myself
lucky - a couple of my friends in my first grade class never came back
to school because the measles killed them. 

Vaccines save lives. Period. 

Be well, 


Dave H

On 2021-11-30 14:12, Juha Manninen via lazarus wrote:

Now people are dying because of the jabs. Those are not side-effects, the jabs work as intended. 
I am more and more convinced there is no SARS-CoV-2 virus. It has not been isolated from any patient during the 2 year "pandemic". Why? 
The only reliable measure of a pandemic is the total number of deaths compared to earlier years. There has been no increase in deaths in almost anywhere (*) so far. In this winter we will see an increase because of the jabs' effects ... and the new Omicron variant is blamed of course. It was all planned a long ago. How are the variants detected, anyone? Even the original virus has not been isolated and the PCR tests give mostly false positives. 
In a Marbug plandemic (or similar) symptoms will be imposed by the "booster-shots" and a new virus will be blamed. It will not be about a real virus then either. 
The agenda behind the plandemic is much worse than most people realize. Wake up please. This scam can be stopped only if enough people raise to oppose it. Don't put diapers on your face, don't consent to segregation passports etc. 

Juha 


(*) The few exceptions, Italy, Spain, some US cities, in early 2020 can be 
explained.-- 
___
lazarus mailing list
lazarus@lists.lazarus-ide.org
https://lists.lazarus-ide.org/listinfo/lazarus

Re: [Lazarus] New Synthwave Demo

[Don Alfredo via lazarus]

This is unacceptable.
-- 
___
lazarus mailing list
lazarus@lists.lazarus-ide.org
https://lists.lazarus-ide.org/listinfo/lazarus

Re: [Lazarus] New Synthwave Demo

[Derek Edson via lazarus]

I do not believe this is an appropriate place for this sort of discussion,
especially with the untruths being spead.

1) People are not dying of the vaccines. There is absolutely no evidence to
supoort this other than conspiratory theories.

2) There is clear evidence of excess deaths do exist. America is over
800,000 deaths. This is less than other pandemics only due to improved
medical facilities.

https://ourworldindata.org/excess-mortality-covid

and

https://ourworldindata.org/grapher/cumulative-excess-deaths-covid?country=USA~RUS~MEX~BRA~IRN~PER

On Wed, 1 Dec 2021, 8:12 am Juha Manninen via lazarus, <
lazarus@lists.lazarus-ide.org> wrote:

> Now people are dying because of the jabs. Those are not side-effects, the
> jabs work as intended.
> I am more and more convinced there is no SARS-CoV-2 virus. It has not been
> isolated from any patient during the 2 year "pandemic". Why?
> The only reliable measure of a pandemic is the total number of deaths
> compared to earlier years. There has been no increase in deaths in almost
> anywhere (*) so far. In this winter we will see an increase because of the
> jabs' effects ... and the new Omicron variant is blamed of course. It was
> all planned a long ago. How are the variants detected, anyone? Even the
> original virus has not been isolated and the PCR tests give mostly false
> positives.
> In a Marbug plandemic (or similar) symptoms will be imposed by the
> "booster-shots" and a new virus will be blamed. It will not be about a real
> virus then either.
> The agenda behind the plandemic is much worse than most people realize.
> Wake up please. This scam can be stopped only if enough people raise to
> oppose it. Don't put diapers on your face, don't consent to segregation
> passports etc.
>
> Juha
>
> (*) The few exceptions, Italy, Spain, some US cities, in early 2020 can be
> explained.
>
> --
> ___
> lazarus mailing list
> lazarus@lists.lazarus-ide.org
> https://lists.lazarus-ide.org/listinfo/lazarus
>
-- 
___
lazarus mailing list
lazarus@lists.lazarus-ide.org
https://lists.lazarus-ide.org/listinfo/lazarus

Re: [Lazarus] New Synthwave Demo

[Mattias Gaertner via lazarus]

Juha, you know, what happens to subscribers staying off topic.

There are already enough platforms for such stuff.

Mattias
-- 
___
lazarus mailing list
lazarus@lists.lazarus-ide.org
https://lists.lazarus-ide.org/listinfo/lazarus

Re: [Lazarus] New Synthwave Demo

[Mattias Gaertner via lazarus]

On Wed, 1 Dec 2021 10:38:59 +1300
Derek Edson via lazarus  wrote:

> I do not believe this is an appropriate place for this sort of
> discussion, especially with the untruths being spead.

People believing in world conspiracies can't be convinced with some
links and mails.

Let's get back to Lazarus.

Mattias
-- 
___
lazarus mailing list
lazarus@lists.lazarus-ide.org
https://lists.lazarus-ide.org/listinfo/lazarus

Re: [Lazarus] New Synthwave Demo

[Anthony Walter via lazarus]

Did someone steal access to Juha's email? Not only are his ramblings
off-topic, but he sounds like a deluded conspiracy theorist bent on
disenfranchising rational people from using these mailing lists.
-- 
___
lazarus mailing list
lazarus@lists.lazarus-ide.org
https://lists.lazarus-ide.org/listinfo/lazarus