Skocz do zawartości


Zdjęcie

[delphi]Rozroznianie cyfr i znakow


  • Zamknięty Temat jest zamknięty
1 odpowiedź w tym temacie

#1 woolfik

woolfik

    Nowy

  • 1 postów

Napisano 10 10 2007 - 09:27

witam serdecznie niedawno zaczalem sie uczyc Delphi i na zaliczenie musze napisac kilka programow jednym z nich jest takie zadanie:

Zdefiniować procedury obsługi zdarzeń formularza:

* - mouse up - zmniejsza form o 10 we wszystkich kierunkach
* - mouse down - powiększa form o 10 we wszyskich kierunkach
* - key down - cyfra przenosi form do lewej krawędzi ekranu, litera do prawej;
* - key press - zmiana koloru na losowy; generator całkowitych liczb losowych realizuje funkcja Random(arg) - losowana jest liczba z przedziału: <0,arg)
* - key up - cyfra przenosi form do górnej krawędzi ekranu, litera do dolnej;

Mouse up/down i key press mam zrobione key down i up niestety nie potrafie zrobic. W key down wymyslilem cos takiego:

Form1.Left := 0;


Niestety przesuwa to tylko formatke do lewej krawedzi bez wzgledu na to czy nacisnalem litere czy cyfre ... ktos wie jak moge to zrobic ?? No i jeszcze jak mam przesunac formatke do prawej krawedzi ? Jak mniemam analogicznie key up bedzie dzialalo w ten sam sposob

Form1.Top := 0



  • 0

#2 Marek_Bielecki

Marek_Bielecki

    Początkujący

  • 19 postów

Napisano 12 10 2007 - 18:14

a może tak kody ASCII

  • 0

Zobacz więcej tematów z tagiem: Delphi



Użytkownicy przeglądający ten temat: 0

0 użytkowników, 0 gości, 0 anonimowych