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

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


PS: Eine Stelle kompiliert bei mir nicht weil HitTestWithLasso(..) an letzter Stelle einen 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 von Der schöne Günther:

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 von oakley:

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