new project

[AOG]

Original geschrieben von Schildi
2. Programierung:

also ganz großes Problem. Man könnt fast meinen Weltuntergang . Ich habe mir schonmal ein kleines COM-Board gekauft, und hab dort ma nen schalter drangebastelt. Der schalter wird auch erkannt und prima und so, aber das Problem ist, wie bekomme ich zum Flusi, das der schalter an ist. Ich habe es also mit Visual Basic programiert, aber irgendwo baue ich richtig mist. Denn der Flusi bekommt immer (egal welche funktion ich nehme, oder wie ich es programiere) die Anweisung "0" geschickt. Was mach ich falsch?

If FSUIPC_Write(&H262, 2, VarPtr(Pause), dwResult) Then
  If FSUIPC_Process(dwResult) Then
   If DTR() = 0 Then
Pause = 1
   End If
   If DTR() = 1 Then
Pause = 0
   End If
  End If
End If

Hi!

Hmm da würd ich einige sachen ändern...

1.

Ganz oben im VB projekt folgendes eingeben

Dim Pause As Integer

weil so wie du das geschrieben hast ist Pause eine Double, ein Double hat aber 8byte ...das heisst es kann leicht sein dass die zwei Byte die du dem FSUIPC übergibst 0 sind...

Ein Integer hat 2 byte dann wird mit dem obigen statement auch alles richtig übergeben

Zweitens würd ich den FSUIPC aufruf wie folgt machen

If FSUIPC_Write(&H262&, 2, VarPtr(Pause), dwResult) Then

weil mit dem "&" danach weiß VB dass ein long pointer übergeben werden
soll, wir hier vielleicht kein problem sein aber bei anderen adressen schon

Was macht DTR() ?


mfg

florian