Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi tastatur umgang (https://www.delphipraxis.net/34945-tastatur-umgang.html)

mirage228 30. Nov 2004 19:11

Re: zu früh gefreut
 
Zitat:

Zitat von onkel2
also ich programmiere mit msum und der Fehler ist nun weg, aber der Pfeil bewegt sich nicht , das muss an dem weiter liegen.
If meineTastatur.wurdeGedrueckt then
If meineTastatur.zeichen ='h' then
begin
meinStift.runter;
meinStift.bewegeUm(-80);
meinStift.hoch;
meinStift.bewegeUm(80);

meinStift.bewegeBis(meinStift.hPosition, meinStift.vPosition - 0.002);
meinStift.bewegeUm(0.001);

// Pfeil zeichnen
meinStift.runter;
meinStift.bewegeUm(-80);
meinStift.hoch;
meinStift.bewegeUm(80);
meineTastatur.weiter
end ;
If meineTastatur.wurdeGedrueckt then
If meineTastatur.zeichen ='r' then
begin
meinStift.runter;
meinStift.bewegeUm(-80);
meinStift.hoch;
meinStift.bewegeUm(80);

meinStift.bewegeBis(meinStift.hPosition, meinStift.vPosition + 0.002);
meinStift.bewegeUm(0.001);

// Pfeil zeichnen
meinStift.runter;
meinStift.bewegeUm(-80);
meinStift.hoch;
meinStift.bewegeUm(80);
meineTastatur.weiter;

end

Oh Gott, das sieht übelst nach "Stifte und Mäuse 2.2" aus.
Die selbe Aufgabe, die ihr habt, machen wir gerade auch Informatik - Also viel Spaß noch :mrgreen:

mfG
mirage228


Alle Zeitangaben in WEZ +1. Es ist jetzt 03:49 Uhr.
Seite 2 von 2     12   

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz