Stift Eingabe zum Schreiben auf Tablet

[Der schöne Günther]

Mein Gott. Holger ist der Mann!

[HolgerX]

Hmm.

Es gibt sogar nen Demo bei Embarcadero:

http://cc.embarcadero.com/item/22684

Leider ist die Seite des Programmierers schon seit 2009 down, da sollte es noch weitere Infos gegeben haben.

[HolgerX]

Hmm..

Hab da mal ein bischen weiter gespielt...

Und gleich auch noch die Verwendung von anderen Recogniser eingebaut.

[Der schöne Günther]

Wirklich großartig :thumb:

Einzig was mir fehlen würde ist ein Radierer. Ich versuche demnächst mal ob ich das vielleicht auch alleine schaffe 8-)


PS: Eine Stelle kompiliert bei mir nicht weil

Delphi-Quellcode:

HitTestWithLasso(..)

an letzter Stelle einen

Delphi-Quellcode:

var

-Parameter erwartet:

Delphi-Quellcode:

function TInkDisp.HitTestWithLasso(Points: OleVariant; IntersectPercent: Single): IInkStrokes;
var
   lassoPoints: OleVariant;
begin
   lassoPoints := EmptyParam();
   Result := DefaultInterface.HitTestWithLasso(Points, IntersectPercent, lassoPoints);
end;

PS: Chua Chee Wee macht auch heute noch Delphi:
https://twitter.com/chuacw
http://chuacw.ath.cx/blogs/chuacw/ar...10/21/967.aspx
https://github.com/chuacw

[HolgerX]

Zitat:

Zitat von Der schöne Günther (Beitrag 1365845)

PS: Eine Stelle kompiliert bei mir nicht weil..

Kann gut sein, ich habe auch schon einige Fehler in der Importierten Activx Unit überarbeitet.
Da werden noch ein paar Schoten drinnen sein.. ;)

[oakley]

Ich denke ich werde mal Günthers Ansatz versuchen.
Hab gerade Visual Studio Installiert. Mal sehen wie ich das jetzt umsetzte.

LG

Mirko

[HolgerX]

Hmm..

Zitat:

Zitat von oakley (Beitrag 1365853)

Ich denke ich werde mal Günthers Ansatz versuchen.
Hab gerade Visual Studio Installiert. Mal sehen wie ich das jetzt umsetzte.

Aber wenn ich Günther verstanden habe, dann macht er es nun ohne VS !?!

@Günther
Den Radiergummi habe ich bei mir auch schon laufen ;)
Werd noch ein bischen sauber machen und dann wieder posten..

[Der schöne Günther]

Da ich in Delphi überhaupt kein Land gesehen habe war der "Umweg" über eine DLL (die dann auch direkt fantastisch funktioniert hat) ein gangbarer Weg.

So toll wie es jetzt direkt in Delphi funktioniert würde ich den Umweg ehrlich gesagt auch nicht mehr gehen.

Wenn du mit deiner Anwendung fast bei Null anfängst und es sich hauptsächlich ums Zeichnen dreht, dann sicher direkt über VS ;-)

[oakley]

Bei null fange ich nicht wirklich an.
Ich wollte eine Möglichkeit bereistellen, handschriftliche Notizen zu einem Datensatz auf einem Tablet machen zu können.
Und dazu auch etwas zu zeichenen also im Prinzip sowas wie one note.

Das Ganze dann noch mit ein paar Fotos aufgepeppt... das wärs.

Sowas könnte man wohl wirklich besser in VB umsetzen und dann in Delphi als ActiveX laufen lassen?

LG

Mirko

[HolgerX]

So, fertig..

Das mit dem Radierer war doch recht einfach..

Musste nur von InkCollector auf InkOverlay umstellen.
Hier dann in der MSINKAUTLib_TLB_HF endgültig alle EXIT rausnehmen.

und die Property EditingMode verwenden ;)