AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Programmieren allgemein Timer Anhalten Während Fenster Verschoben Wird
Thema durchsuchen
Ansicht
Themen-Optionen

Timer Anhalten Während Fenster Verschoben Wird

Ein Thema von terence14 · begonnen am 14. Jan 2013 · letzter Beitrag vom 14. Jan 2013
Antwort Antwort
Seite 2 von 2     12   
Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.625 Beiträge
 
Delphi 12 Athens
 
#11

AW: Timer Anhalten Während Fenster Verschoben Wird

  Alt 14. Jan 2013, 15:30
Zitat:
TeddyH in DeddyH geändert
Thx

[edit]
Zitat:
Delphi-Quellcode:
if prvMouseOnFormularDown then begin
   {-do nothing here-}
end else begin
Wieso nicht einfach
if not prvMouseOnFormularDown then begin das else braucht man dann nicht?
[/edit]
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen

Geändert von DeddyH (14. Jan 2013 um 15:33 Uhr)
  Mit Zitat antworten Zitat
terence14
(Gast)

n/a Beiträge
 
#12

AW: Timer Anhalten Während Fenster Verschoben Wird

  Alt 14. Jan 2013, 15:40
Zitat:
TeddyH in DeddyH geändert
Thx

[edit]
Zitat:
Delphi-Quellcode:
if prvMouseOnFormularDown then begin
   {-do nothing here-}
end else begin
Wieso nicht einfach
if not prvMouseOnFormularDown then begin das else braucht man dann nicht?
[/edit]
Das ist natürlich richtig

a) es ist ein Testprogramm
b) es ist mein Stil, es so umständlich zu machen

MfG,
terence
  Mit Zitat antworten Zitat
Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.625 Beiträge
 
Delphi 12 Athens
 
#13

AW: Timer Anhalten Während Fenster Verschoben Wird

  Alt 14. Jan 2013, 15:42
b) es ist mein Stil, es so umständlich zu machen
Naja, mein erster Gedanke als Außenstehender war wörtlich: "Häh?"
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
  Mit Zitat antworten Zitat
Benutzerbild von stahli
stahli

Registriert seit: 26. Nov 2003
Ort: Halle/Saale
4.343 Beiträge
 
Delphi 11 Alexandria
 
#14

AW: Timer Anhalten Während Fenster Verschoben Wird

  Alt 14. Jan 2013, 15:43
Ich finde an der Stelle auch Exit ganz übersichtlich.
Bei Funktionen kann man sogar einen Wert mitgeben:

Delphi-Quellcode:
procedure xy;
begin
  if xyz then
    Exit;
  abc;
end;

function xy: Boolean;
begin
  if xyz then
    Exit(False);
  Result := abc;
end;
Stahli
http://www.StahliSoft.de
---
"Jetzt muss ich seh´n, dass ich kein Denkfehler mach...!?" Dittsche (2004)
  Mit Zitat antworten Zitat
Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.625 Beiträge
 
Delphi 12 Athens
 
#15

AW: Timer Anhalten Während Fenster Verschoben Wird

  Alt 14. Jan 2013, 15:48
"Exit" und "übersichtlich" geht IMO nur in seltenen Fällen zusammen. Aber ich will hier keinen Glaubenskrieg vom Zaun brechen.
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
  Mit Zitat antworten Zitat
Medium

Registriert seit: 23. Jan 2008
3.686 Beiträge
 
Delphi 2007 Enterprise
 
#16

AW: Timer Anhalten Während Fenster Verschoben Wird

  Alt 14. Jan 2013, 16:23
Ich halte das mit den Exits so: Wenn ich sie nutze, dann nur ganz am Anfang einer Methode, mit einem kleinen Kommentar, dass hier Gültigkeitsprüfungen für Parameter etc. passieren.

Wenn es um komplexere Prüfungen geht, und Dinge, die dazu führen dass die Methode immerhin teilweise auch ausgeführt wird, arbeite ich lieber mit ein paar lokalen Variablen der Art "conditionIsValid" über die dann später verzweigt wird. Ein Exit mitten drin wird es bei mir also nicht geben, am Anfang z.B. zur Parametervalidierung helfen sie ein paar recht unübersichtliche if-Schachtelungstiefen zu vermeiden.

Was ich auch gerne mache, sind Early-Out-Szenarien der Art:
Delphi-Quellcode:
function TMyClass.IndexOfObject(someObject: TObject): Integer;
var
  i: Integer;
begin
  result := -1;
  for i := Low(FArray) to High(FArray) do
    if FArray[i] = someObject then
      Exit(i);
end;
Für sowas ist Exit einfach klasse schlank.
"When one person suffers from a delusion, it is called insanity. When a million people suffer from a delusion, it is called religion." (Richard Dawkins)
  Mit Zitat antworten Zitat
terence14
(Gast)

n/a Beiträge
 
#17

AW: Timer Anhalten Während Fenster Verschoben Wird

  Alt 14. Jan 2013, 19:39
...
Ein Exit mitten drin wird es bei mir also nicht geben, am Anfang z.B. zur Parametervalidierung helfen sie ein paar recht unübersichtliche if-Schachtelungstiefen zu vermeiden.
...
Ditto.
Das schöne am Programmieren ist doch, daß man (fast) unendlich
viele Wege einschlagen kann, um eine Aufgabe zu meistern.

Nun ist es an einem, eine übersichtliche und leicht pflegbare
Methode zu finden.

Fehler aus früheren Zeiten können helfen, oder Tipps von
der DP-Gemeinde.

MfG,
terence
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 2 von 2     12   


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 08:45 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz