Forum: Multimedia
Delphi
by himitsu,
30. Nov 2006
Du nimmst dir die Ereignisse OnMouseDown, OnMouseUp und OnMausMove des Objekts, wo drauf gezeichnet wird.
Beim Drücken der Maustaste prüfst du ob der Mauszeiger z.B. auf den kleinem Schieber liegt und setzt dir dann eine Variable (z.B. SchieberAktiv := True;).
Wenn die Maus verschoben wird, wird die neue Position bestimmt und der Schieber neu gezeichnet. (nur wenn SchieberAktiv = True.
...
Forum: Multimedia
Delphi
by himitsu,
7. Nov 2006
Also bei dem Programm da oben hab ich mir irgendeine Canvas besogt (weiß grad nicht mehr welche ..., aber vermutlich die von 'nem TImage) und dann da draufgemalt.
(im Unterverzeichnis Proc0 sind z.B. die Codes für die "Original-Version" meines Proggies, aber kopier nich gleich alles .... dieses Programm ist nich gerade gut Programmiert :roll: )
z.B.
Canvas.Pixels
Canvas.MoveTo,...
Forum: Multimedia
Delphi
by himitsu,
6. Nov 2006
Da es hier gerade mal wieder aktuell ist/war,
ich's grad mal wieder gesehn hab
und schon seit 'ner Weile das Spieleschreiben
anderen überlasse...
Hier mal was uraltes ... von Mitte 1999.
Es ist mal mit Delphi 4 angefangen wurden.