Avatar billede stefmeister Nybegynder
19. april 2005 - 16:23 Der er 3 kommentarer og
1 løsning

Graf og mus

Hej

Jeg har lavet et koordinatsystem, sådan at man kan lave kurver etc. Det gør jeg ved at have et image liggende, så bruger jeg Image.Canvas.LineTo etc. etc. Det virker også helt fint.
Så kunne jeg godt tænke mig at have en mus hvor der er streger både lådret og vandret, helt ud til siden.
Ligesom i dette exempel:

procedure TForm1.Image3MouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
begin
Image3.Canvas.FillRect(ClientRect);
Image3.Canvas.MoveTo(X,0);
Image3.Canvas.LineTo(X,500);
Image3.Canvas.MoveTo(0,Y);
Image3.Canvas.LineTo(500,Y);
Image3.Cursor := crNone;
end;

Det er præcis sådan det skal være. Men hvordan gør jeg det UDEN at slette hele min graf/kurve?
Avatar billede kroning Nybegynder
20. april 2005 - 08:26 #1
Hvad med at bruge 2xTShape. I f.eks. form.Oncreate skriver du:
  Shape1.Width:=1;
  Shape1.Height:=Image3.Height;
  Shape1.Top:=Image3.Top;
  Shape2.Height:=1;
  Shape2.Width:=Image3.Width;
  Shape2.Left:=Image3.Left;

Og i Image3MouseMove:
  Shape1.Left:=Image3.Left+x;
  shape2.Top:=Image3.Top+y;
  Image3.Cursor := crNone;
Avatar billede kroning Nybegynder
20. april 2005 - 08:28 #2
Og lige en ting mere, husk at flytte de 2 shapes bag ved dit Image, f.eks. i OnCreate med:

Shape1.SendToBack;
Shape2.SendToBack;
Avatar billede stefmeister Nybegynder
20. april 2005 - 12:24 #3
Det hakker lidt, især hvis man kører på en ældre computer. Men det er okay.
lægger du et svar?
Avatar billede kroning Nybegynder
20. april 2005 - 16:13 #4
ok
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester