AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Delphi-PRAXiS - Lounge Klatsch und Tratsch If (YouLoveVCL = true) then TReadThisNow.Create();
Thema durchsuchen
Ansicht
Themen-Optionen

If (YouLoveVCL = true) then TReadThisNow.Create();

Ein Thema von himitsu · begonnen am 5. Mär 2014 · letzter Beitrag vom 6. Mär 2014
Antwort Antwort
Seite 2 von 2     12   
Der schöne Günther

Registriert seit: 6. Mär 2013
6.176 Beiträge
 
Delphi 10 Seattle Enterprise
 
#11

AW: If (YouLoveVCL = true) then TReadThisNow.Create();

  Alt 6. Mär 2014, 09:47
Toll, und ich?

Warum schreibt mir niemand?
  Mit Zitat antworten Zitat
Benutzerbild von Sir Rufo
Sir Rufo

Registriert seit: 5. Jan 2005
Ort: Stadthagen
9.454 Beiträge
 
Delphi 10 Seattle Enterprise
 
#12

AW: If (YouLoveVCL = true) then TReadThisNow.Create();

  Alt 6. Mär 2014, 09:56
Eigentlich müsste der Code ja lauten
Delphi-Quellcode:
while not Tux.Satt do
begin
  Fisch := TFisch.Create;
  try
    Tux.Esse( Fisch ); // mögliche Exception ETuxKotzt
  finally
    Fisch.Free;
  end;
end;
Kaum macht man's richtig - schon funktioniert's
Zertifikat: Sir Rufo (Fingerprint: ‎ea 0a 4c 14 0d b6 3a a4 c1 c5 b9 dc 90 9d f0 e9 de 13 da 60)
  Mit Zitat antworten Zitat
Blup

Registriert seit: 7. Aug 2008
Ort: Brandenburg
1.477 Beiträge
 
Delphi 12 Athens
 
#13

AW: If (YouLoveVCL = true) then TReadThisNow.Create();

  Alt 6. Mär 2014, 10:02
Im Sinne der Objektorientierung ist es sinnvoller, wenn Tux selber entscheidet ob er satt ist.
Zu einseitige Ernährung sollte vermieden werden, deshalb würde ich Essen nicht auf Fisch beschränken.
Ich bin in diesem Fall auch gegen die externe Freigabe gegessener Fische.
Wenn Tux die Fische frist, soll er selber entscheiden wann (und in welcher Form) er die wieder freigibt.

while not Tux.Satt do
begin Fisch := TFisch.Create; Tux.Essen(Fisch); Fisch := nil; end;
  Mit Zitat antworten Zitat
Benutzerbild von Sir Rufo
Sir Rufo

Registriert seit: 5. Jan 2005
Ort: Stadthagen
9.454 Beiträge
 
Delphi 10 Seattle Enterprise
 
#14

AW: If (YouLoveVCL = true) then TReadThisNow.Create();

  Alt 6. Mär 2014, 10:13
Ob die Entität Fisch noch als solche betrachtet werden kann, kann Tux nicht entscheiden, sondern nur die Umgebung. Genauso wie Tux nicht entscheiden kann ob es jetzt auf einmal eine Entität Fisch gibt.

Ich wäre an seiner Stelle auch vorsichtig, sonst entscheidet die Umgebung, dass die Entität Tux überflüssig ist und entledigt sich diesem Emporkömmling mit einem lapidaren Tux.Free .
Kaum macht man's richtig - schon funktioniert's
Zertifikat: Sir Rufo (Fingerprint: ‎ea 0a 4c 14 0d b6 3a a4 c1 c5 b9 dc 90 9d f0 e9 de 13 da 60)
  Mit Zitat antworten Zitat
Benutzerbild von DeddyH
DeddyH

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

AW: If (YouLoveVCL = true) then TReadThisNow.Create();

  Alt 6. Mär 2014, 10:13
Haben wir denn nun genug getuxt?
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
Daniel
(Co-Admin)

Registriert seit: 30. Mai 2002
Ort: Hamburg
13.920 Beiträge
 
Delphi 10.4 Sydney
 
#16

AW: If (YouLoveVCL = true) then TReadThisNow.Create();

  Alt 6. Mär 2014, 10:15
Nun, wenn man mal grob die Menge an Arbeitszeit überschlägt, die für diesen Thread sowohl beim Lesen als auch Mitwirken aufgewendet wurde und diese dann mit den üblichen Lohnkosten multipliziert, haben wir einen weiteren im Wert nicht zu unterschätzenden Thread.
Daniel R. Wolf
mit Grüßen aus Hamburg
  Mit Zitat antworten Zitat
Benutzerbild von stahli
stahli

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

AW: If (YouLoveVCL = true) then TReadThisNow.Create();

  Alt 6. Mär 2014, 10:27
Daniel, wenn das so weiter geht wird in Deinem Forum endgültig die Frage beantwortet, wie Leben entsteht... Verbaue Dir das nicht.
Stahli
http://www.StahliSoft.de
---
"Jetzt muss ich seh´n, dass ich kein Denkfehler mach...!?" Dittsche (2004)
  Mit Zitat antworten Zitat
Lemmy

Registriert seit: 8. Jun 2002
Ort: Berglen
2.381 Beiträge
 
Delphi 10.4 Sydney
 
#18

AW: If (YouLoveVCL = true) then TReadThisNow.Create();

  Alt 6. Mär 2014, 10:33
wie so oft wären auch hier Interfaces die Lösung, die zum einen die einseitige Ernährung (ernähren sich Pinguine eigentlich von was anderem außer Fisch?) sowie die Freigabe der Instanzen einfach lösen könnten.
  Mit Zitat antworten Zitat
franktron

Registriert seit: 11. Nov 2003
Ort: Oldenburg
1.446 Beiträge
 
Delphi 10.2 Tokyo Enterprise
 
#19

AW: If (YouLoveVCL = true) then TReadThisNow.Create();

  Alt 6. Mär 2014, 10:40
wie so oft wären auch hier Interfaces die Lösung, die zum einen die einseitige Ernährung (ernähren sich Pinguine eigentlich von was anderem außer Fisch?) sowie die Freigabe der Instanzen einfach lösen könnten.
Nach den Die Pinguine aus Madagascar nicht.

Und ich glaub Tux ist nie satt so ein Grossen Bauch wie er hat.
Frank
Tux sein Lieblingsquellcode
While anzfische<TuxSatt do begin
Fisch:=TFisch.Create; Tux.EssenFisch(Fisch); Fisch.Free;inc(anzfische); end;
  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 21:18 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