Tak...
Der var noget jeg kunne bruge, grunden er at jeg er ved at, eller har lavet
et program til
Statisyical Process Control, Programmet læser en antal målinger, som har en
Nominel mål
og en Øver / Neder Tolerance Grænse, så for at styre Process beregner man
Gennemsnit, Spredning, Cp, Cpk, værdier og tager man Cpk værdien, som er en
beskrivelse af hvor godt Process er styret i mitten (Det Nominelle mål).
Man alt dette kunne jeg godt tænke mig at få overført til noget grafisk.
Jeg har det til at virke, hvor jeg Printer punkter ud i en form, men Cirkel
og Linie
Men hver gang jeg indlæser nye værdier ind skal jeg tilpasse Scall forholdet
og det driller mig meget.
Det eneste jeg har og gå ud fra er det Nominelle og Øver / Neder Toleransen
grænser altså Eks. et mål
10 mm +/-0.1 mm
Og den Nominelle mål på 10 mm skal være i mitten af formen hvor der også er
plads til Grænserne.
Hvis der er nogle der har en interesse i at se det, så kan programmet hentes
på
http://webtime.adr.dk under WinSigma.
Programmet virker, men ikke det grafiske Desværre.
"Stefan McKinnon Edwards" <6x102621@tiscali.dk> skrev i en meddelelse
news:I_UF8.416$N46.23362@news010.worldonline.dk...
> Først skal du have dig et par slag(!) for at bruge mm på den måde.
> SMACK!
> Dernæst, hvis du så absolut gerne vil bruge mm (gudbevare mig!) på din
form,
> så skal du først ændre din "ScaleMode" på din formular til "6 -
> Millimeter" - derefter kan du benytte ScaleWidth og ScaleHeight som
> millimeter.
> !
>
> Det næste du spørger om - er at ændre koordinatsystemet på din formular.
Du
> vil have punktet (0, 0) til at ligge midt på formularen. Dette kan ikke
lade
> sig gøre. Ganske umuligt. Ikke engang API kan gøre dette, da dette kun vil
> blive set af programmøren der læser koden.
> Men du kan arbejde dig udenom dette. Under dine forudsætninger:
>
> Form1.ScaleHeight = 2000
> Form1.ScaleWidth = 4000
>
> ligger midtpunkter (tja... lidt hovedregning) i (1000, 2000). Det er dine
> aboslutte konstanter for nulpunktet. Derfra, hvis du vil f.eks. sætte en
> linie fra (500, 250) til (650, 1350), skal du plotte de koordinater ind
PLUS
> midtpunktet:
>
> Const MidtX = 1000
> Const MidtY = 2000
>
> line.x1 = 500 + MidtX
> line.y1 = 250 + MidtY
> line.x2 = 650 + MidtX
> line.y2 = 1350 + MidtY
>
> Værs'go!
>
> --
> Stefan McKinnon Edwards, Herning, Denmark
>
www.iysik.com
>
>
> "Jørgen Holdt" <jhdata@adr.dk> wrote in message
> news:3ce6d4af$0$10881$d40e179e@nntp01.dk.telia.net...
> Hvordan ændrer man en nul punkt i en Form boks efter man brugt
>
>
>
> Form1.ScaleHeight = 2000
>
> Form1.ScaleWidth = 4000
>
>
>
> Jeg vil gerne have nul punktet til at ligge i mitten af Y Aksen (Height)
>
>
>
> Jeg vil også gerne arbejde i mm, så Form boksen nu er 2000 mm høj og 4000
mm
> bred.
>
>
>
> Der efter vil jeg tegne i den med Line(2000,0)-(2000,1000) så nu er der en
> linie fra mitten af
>
> Formen og op efter.
>
>
>
> Jeg syntes ikke når jeg bruger Form1.Top og Form1.Left virker som jeg
> forventet det ?
>
>
>
> Jeg hade forstillet mig at jeg skulle sætte
>
>
>
> Form1.Top = 1000
>
> Form1.Left = 0
>
>
> --------------------------------------------
> (¯`·.¸¸.-=[ WebTime ]=-.¸¸.·´¯)
> --------------------------------------------
>
http://webtime.adr.dk
> --------------------------------------------
>
>
>
>