---

Ja dav!

Hvad er der galt, jeg kan ikke se denne prik på skærmen!
Skal der defineres et eller anden for at sætte "prikker" på skærmen!
skulle der ikke komme en prik på formen med dette!

procedure TForm1.FormCreate(Sender: TObject);
begin
canvas.Pixels[100,100] := clblack;
end;


--
M.v.h.
Hans Nikolajsen
E-mail: jadavtest@stofanet.dk
Homepage: http://home1.stofanet.dk/jadav/
Fjern test fra min E-mail for at skrive til mig!

---

"Hans Nikolajsen" <jadavtest@stofanet.dk> wrote in
news:3e51ebe3$0$24701$ba624c82@nntp02.dk.telia.net:

> Ja dav!

Dav Dav :)

> Hvad er der galt, jeg kan ikke se denne prik på skærmen!
> Skal der defineres et eller anden for at sætte "prikker" på skærmen!
> skulle der ikke komme en prik på formen med dette!
>
> procedure TForm1.FormCreate(Sender: TObject);
> begin
> canvas.Pixels[100,100] := clblack;
> end;

Hvis du flytter koden til den rigtige event, der i dette tilfælde er
OnPaint, så skal du bare se...
OnCreate kaldes kun en gang nemlig når formen bliver oprettet, hvis du
skal tegne noget på formen skal det derfor foregå i OnPaint, da denne
event opstår hver gang der er behov for en gentegning af formen.

/Claus

--
Claus Christiansen, <mailto:NOSPAM@unipeople.dk>, leave the adr. as it is
personal: <http://unipeople.dk/~cch>; pythia: <http://www.pythia.dk>
===========================================================--------------
"Computers are useless. They can only give you answers" - Pablo Picasso

---

Ja dav!

Mig ikke forstå ??????

Kunne jeg lokke lidt med dig.
Prøv at skriv et eksempel der sætter en prik på en form.
Det skal bruges til at tegne en graf med senere.
På forhånd tak!


--
M.v.h.
Hans Nikolajsen
E-mail: jadavtest@stofanet.dk
Homepage: http://home1.stofanet.dk/jadav/
Fjern test fra min E-mail for at skrive til mig!


"Claus Christiansen" <NOSPAM@unipeople.dk> skrev i en meddelelse
news:Xns93266B6E932FCkrucsid@news.unipeople.dk...
> "Hans Nikolajsen" <jadavtest@stofanet.dk> wrote in
> news:3e51ebe3$0$24701$ba624c82@nntp02.dk.telia.net:

> > procedure TForm1.FormCreate(Sender: TObject);
> > begin
> > canvas.Pixels[100,100] := clblack;
> > end;

> Hvis du flytter koden til den rigtige event, der i dette tilfælde er
> OnPaint, så skal du bare se...
> OnCreate kaldes kun en gang nemlig når formen bliver oprettet, hvis du
> skal tegne noget på formen skal det derfor foregå i OnPaint, da denne
> event opstår hver gang der er behov for en gentegning af formen.
>
> /Claus
>
> --
> Claus Christiansen, <mailto:NOSPAM@unipeople.dk>, leave the adr. as it is
> personal: <http://unipeople.dk/~cch>; pythia: <http://www.pythia.dk>
> ===========================================================--------------
> "Computers are useless. They can only give you answers" - Pablo Picasso

---

"Hans Nikolajsen" <jadavtest@stofanet.dk> wrote in message
news:3e521263$0$2554$ba624c82@nntp04.dk.telia.net...
> > > procedure TForm1.FormCreate(Sender: TObject);
> > > begin
> > > canvas.Pixels[100,100] := clblack;
> > > end;
>
> > OnCreate kaldes kun en gang nemlig når formen bliver oprettet, hvis du
> > skal tegne noget på formen skal det derfor foregå i OnPaint, da denne
> > event opstår hver gang der er behov for en gentegning af formen.
>
> Mig ikke forstå ??????
>

Det claus siger er, at først creates din form, BAGEFTER tegnes den! Det
betyder at hvis du tegner noget som helst OnCreate så bliver det overskrev
ved OnShow...

Prøv at gøre samme trick som du gjorde ovenfor men i stedet under
TForm.OnShow, eller på f.eks. en TButton.OnClick...

PS: Hans, kunne jeg ikke overtale dig til at bruge 30sekunder på at læse:
http://www.usenet.dk/netikette/citatteknik.html

Mvh
Thomas

---

"Thomas Eg Jørgensen" <thomas@kontorbutikken.dk> wrote in
news:b2t4hr$c5e$1@sunsite.dk:

>
> "Hans Nikolajsen" <jadavtest@stofanet.dk> wrote in message
> news:3e521263$0$2554$ba624c82@nntp04.dk.telia.net...
>> > > procedure TForm1.FormCreate(Sender: TObject); begin
>> > > canvas.Pixels[100,100] := clblack; end;
>>
>> > OnCreate kaldes kun en gang nemlig når formen bliver oprettet,
>> > hvis du skal tegne noget på formen skal det derfor foregå i
>> > OnPaint, da denne event opstår hver gang der er behov for en
>> > gentegning af formen.
>>
>> Mig ikke forstå ??????
>>
>
> Det claus siger er, at først creates din form, BAGEFTER tegnes den!
> Det betyder at hvis du tegner noget som helst OnCreate så bliver det
> overskrev ved OnShow...
>
> Prøv at gøre samme trick som du gjorde ovenfor men i stedet under
> TForm.OnShow, eller på f.eks. en TButton.OnClick...

De to events er nok ikke helt optimale, hvis "prikken" skal vises hele
tiden (læs efter f.eks en minimize eller flytningen af formen uden for
skærmen eller lign.) - men det korrekte sted vil være OnPaint eventen,
som tests er det selvfølgelig fremragende eksempler.

PS: Jeg ville forøvrigt, bruge lineto(,) til at tegne grafer i stedet,
det gør det lidt nemmere at ændre størrelsen på grafen (afh. af f.eks.
brugerens opløsning)

PS, PS: Tak til Thomas for svaret på mine vegne.

/Claus

--
Claus Christiansen, <mailto:NOSPAM@unipeople.dk>, leave the adr. as it is
personal: <http://unipeople.dk/~cch>; pythia: <http://www.pythia.dk>
===========================================================--------------
"Computers are useless. They can only give you answers" - Pablo Picasso

---

Thomas

Det er bare så rart at se svar i stedet for spørgsmål - det har man jo lige
læst.

Hvis der er mange spørgsmål svarer man nede i teksten, - enkelt spørgsmål
besvares i toppen af sidste indlæg -

enkelt og rationelt

Thomas Riedel

> PS: Hans, kunne jeg ikke overtale dig til at bruge 30sekunder på at læse:
> http://www.usenet.dk/netikette/citatteknik.html
>
> Mvh
> Thomas
>
>

---

"Thor" <thr@image.danmark> wrote in
news:o0x4a.90375$Hl6.8429179@news010.worldonline.dk:

> Thomas
>
> Det er bare så rart at se svar i stedet for spørgsmål - det har man
> jo lige læst.
>
> Hvis der er mange spørgsmål svarer man nede i teksten, - enkelt
> spørgsmål besvares i toppen af sidste indlæg -
>
> enkelt og rationelt
>
> Thomas Riedel
>
>> PS: Hans, kunne jeg ikke overtale dig til at bruge 30sekunder på at
>> læse: http://www.usenet.dk/netikette/citatteknik.html
>>

Ja ud fra ovenståede er det jo da rigtig dejligt nemt, at læse at du
svarer på en eller anden kommentar, der ikke har noget med det
oprindelige oplæg at gøre :)

- Kort sagt forkert citatteknik: uoverskueligt og irrationelt

så henvisningen var helt på sin plads, og da absolut mere anvendelig og
venligere end det er set i mange andre tilfælde :)

PS: Hvis diskussionen skal fortsætte bør den FUTtes til en passende
gruppe - fx. dk.admin.netikette, hvor det forøvrigt debateres pt.

/Claus


--
Claus Christiansen, <mailto:NOSPAM@unipeople.dk>, leave the adr. as it is
personal: <http://unipeople.dk/~cch>; pythia: <http://www.pythia.dk>
===========================================================--------------
"Computers are useless. They can only give you answers" - Pablo Picasso