Skrypt na linie

[Sevano]

Siema

Może ktoś zrobić taki skrypt?

 

Klikam w 1 miejsce później w 2 i pomiędzy tymi punktami tworzy się linia, a kiedy wcisne np. enter to linia sie usunie.

[Phoenix_PL]

niekoniecznie się da w AutoIT... pogmeraj w GDI+, może coś znajdziesz

 

Bo z klikaniem i robieniem linii nie ma problemu... gorzej z rysowaniem na pulpicie

[wefhy]

Mi się nie chce bo już kiedyś coś takiego zrobiłem i chyba nawet udostępniłem(nie wiem gdzie), ale da się: potrzeba 4 obrazków z linią - poziomą, pionową i 2-ma ukośnymi. W połączeniu z przezroczystością okna(i grafiki, podpowiem, kolor czarny) i utworzeniem grafiki kończącej się na współrzędnych gdzie kliknięto nie będzie problemu.

[Phoenix_PL]

@up.

Rozumiem że chcesz skalować obrazek? Kiepski pomysł.

Lepiej już zrobić przezroczyste GUI i rysować przez GDI+ albo nawet na Graphics'u.

[wefhy]

To przy GDI+ da się zrobić przezroczyste okno?

[Phoenix_PL]

No właśnie z przezroczystym tłem jest największy problem, bo reszta to pikuś.

wefhy, nie wiem x)

[JacoH]

Powiedz czy to chcesz robić w okienku czy normalnie i ogarnij rysowanie linii w C++, ale to już może być trudniejsze

[jackraymund]

hotkeyset("{F9}","st")
hotkeyset("{F10}","st1")
hotkeyset("{enter}","st2")
global $hDC, $hPen, $obj_orig,$1,$2
#include <WindowsConstants.au3>
#include <WinAPI.au3>
func st()
$1 = mousegetpos()
EndFunc
func st1()
$2 = mousegetpos()
$hDC = _WinAPI_GetWindowDC(0) ; DC of entire screen (desktop)
$hPen = _WinAPI_CreatePen($PS_SOLID, 1, 0)
_WinAPI_DrawLine($hDC, $1[0], $1[1], $2[0], $2[1]) ; horizontal left
EndFunc
func st2()
_WinAPI_RedrawWindow(_WinAPI_GetDesktopWindow(), 0, 0, $RDW_INVALIDATE + $RDW_ALLCHILDREN)
_WinAPI_DeleteObject($hPen)
EndFunc
while 1
sleep(100)
WEnd

szybkie przerobienie helpa, pierwszy pnukt, klikasz f9, 2 punkt f10, jak chcesz usunac to enter

a jak chcesz usunac f9 i f10 to poszukaj sobie udfa na to

jak kolor chcesz zmienic to 3 flaga z createpen

[Phoenix_PL]

Skurczydrań ... winapi to je moc..

I nawet kod działa, na okienkach też piszę

Lajk rzecz jasna.

[Sevano]

Działa, fajnie, ale jest jeden mały problem - kiedy pojawi się jakaś animacja pod linią to ona znika, można jakoś pozbyć się tego problemu?

[jackraymund]

musialbys w petle dac tworzenie lini, lecz i tak bedzie migac

[wefhy]

Genialne! Ale Mi się co chwilę odświeża(tak co 5 sekund)

Jak się przytrzyma F10 to fajne kreski wychodzą.

[Phoenix_PL]

Nom, też to sprawdzałem

[Sevano]

możesz dodać do tego kody pętle ?? sam próbowałem, ale coś robie źle i skrypt nie działa.

[wefhy]

Mi się udało dodać pętlę na 2 sposoby

1:

 

hotkeyset("{F9}","st")
hotkeyset("{F10}","st1")
hotkeyset("{enter}","st2")
global $hDC, $hPen, $obj_orig,$1,$2
#include <WindowsConstants.au3>
#include <WinAPI.au3>
func st()
$1 = mousegetpos()
EndFunc
func st1()
while 1
$2 = mousegetpos()
$hDC = _WinAPI_GetWindowDC(0) ; DC of entire screen (desktop)
$hPen = _WinAPI_CreatePen($PS_SOLID, 1, 0)
_WinAPI_DrawLine($hDC, $1[0], $1[1], $2[0], $2[1]) ; horizontal left
WEnd
EndFunc
func st2()
_WinAPI_RedrawWindow(_WinAPI_GetDesktopWindow(), 0, 0, $RDW_INVALIDATE + $RDW_ALLCHILDREN)
_WinAPI_DeleteObject($hPen)
EndFunc
while 1
sleep(100)
WEnd

 

2:

hotkeyset("{F9}","st")

hotkeyset("{F10}","st")

hotkeyset("{enter}","st2")

global $hDC, $hPen, $obj_orig,$1,$2

#include <WindowsConstants.au3>

#include <WinAPI.au3>

func st()

$1=mousegetpos()

while 1

$2 = mousegetpos()

$hDC = _WinAPI_GetWindowDC(0) ; DC of entire screen (desktop)

$hPen = _WinAPI_CreatePen($PS_SOLID, 1, 0)

_WinAPI_DrawLine($hDC, $1[0], $1[1], $2[0], $2[1]) ; horizontal left

$1=$2

WEnd

EndFunc

func st2()

_WinAPI_RedrawWindow(_WinAPI_GetDesktopWindow(), 0, 0, $RDW_INVALIDATE + $RDW_ALLCHILDREN)

_WinAPI_DeleteObject($hPen)

EndFunc

while 1

sleep(100)

WEnd