|
Dobrý den všem. Právě dokončuji svůj první projekt ve VB, a potřeboval bych se poradit o věcech, se kterými si nevým rady. 1. Pokoušel jsem se při události Form1_MouseClick zjistit zda byla při kliknutí držena klávase Ctrl. V argumentu e jsem bohužel nic takového nenašel tak jsem to zbastlil tímto způsobem:
Private Ctrl As Boolean
Private Sub Form1_KeyDown
If e.KeyCode = 17 Then Ctrl = True
End Sub
Private Sub Form1_KeyUp
If e.KeyCode = 17 Then Ctrl = False
End Sub
Private Sub Form1_MouseClick
If Ctrl Then
.....
End If
End Sub
Ale za prvé to není moc spolehlivé, stane se mi, že proměnná Ctrl zustane True i po uvolnění klávesy a za druhé si myslím že by to mělo snad jít nějakým elegantnějším způsobem. 2. Zajímalo by mě, jak v praxi píšete text licence k programu? Zaplatí se právník, nebo se to zkopíruje z jiného programu a změní se názvy autora? Nebo texty licencí nepíšete vůbec?
|