07-26-2005 05:14 AM
07-26-2005 11:01 AM
07-28-2005 04:11 AM
Hallo Herr Schumacher,
Danke für ihre Antwort. was Sie erzählt haben,wollte ich automatisch machen.z.B
ich habe zwei 2-D Achse. oberen Achse habe ich meinen graph,und untern achse meinen Tangent-Achse. ich nehme 2 punkte mit cursors auf meinen Graph,und sehe ich in unteren Graph meine Tangente. Ich will nich jedes mal Taaschenrechner benutzen, ich will es automatisch machen lassen.
Sie haben geschrieben,das man mit VBS machen, aber ich habe noch nicht das benutzt.Haben Sie eine Beispiel für mich?
mfG
Hakan
07-29-2005 02:24 AM - edited 07-29-2005 02:24 AM
''Init
set cursor = view.activesheet.cursor
set curves = View.ActiveSheet.ActiveArea.DisplayObj.Curves
set curve = Curves(1)
' Band- und Kurvencursor einschalten
cursor.Type = "Band"
cursor.Mode = "GraphPoints"
call View.ActiveSheet.ActiveArea.DisplayObj.SetLeadingCurve(1)
' Cursorpositionen auslesen
anfang = cursor.p1
ende = cursor.p2
if ende=0 then ende = pno(curve.xchannelnumber,cursor.x2)
'Berechnungen
x1= chdx(anfang,curve.xchannelnumber)
x2= chdx(ende,curve.xchannelnumber)
y1= chdx(anfang,curve.ychannelnumber)
y2= chdx(ende,curve.ychannelnumber)
m=(x1-x2)/(y1-y2)
b= y1-m*x1
equ= "y = "&m&" * x + "&b
'Kanäle allokieren
tx=cno("free")
Call chnalloc(curve.xchannelname&" Tangente 1",anzahl)
ty=cno("free")
Call chnalloc(curve.ychannelname&" Tangente 1",anzahl)
Call ChnPropSet(ty, "description", equ)
Call ChnPropCreate(ty, "m", DataTypeFloat64)
Call ChnPropSet(ty, "m", m)
Call ChnPropCreate(ty, "b", DataTypeFloat64)
Call ChnPropSet(ty, "b", b)
'Punkte in neuen Kanälen einfügen
chd(1,tx)=x1
chd(2,tx)=x2
chd(1,ty)=y1
chd(2,ty)=y2
'Neue Kurve im VIEW eintragen
Call Curves.Add(tx,ty)
Curves(Curves.count).Color="red"
call View.ActiveSheet.ActiveArea.DisplayObj.SetLeadingCurve(1)
CAll View.refresh
Message Edited by IngoS on 07-29-2005 09:32 AM
08-01-2005 03:06 AM
Danke Hr.Schumacher,
das ist genau, was ich machen möchte...
Vielen Dank für ihre Hilfe
MfG
Hakan
07-16-2007 03:19 AM
Hallo Entshuldigung Jetz mache ich ein program wo ich brauche automatish eint tangent zu tun, aber ich verstehe nicht so gut diese beispiel. Ich bien mexikaner und ich bin in Deutschland und mache ein projekt aber mein Deutsch ist nicht so gut. Is dass moglich das Sie haben diese beispiel für Labview ? PS. Wenn Sie Englisch kann es ist besser für mich. Vielen Dank Bis dann.
07-16-2007 03:49 AM
07-17-2007 08:49 AM
07-17-2007 08:51 AM
07-17-2007 09:24 AM