Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Problem mit ReadString, Immer Def (https://www.delphipraxis.net/152292-problem-mit-readstring-immer-def.html)

Fussel9 17. Jun 2010 18:26

AW: Problem mit ReadString, Immer Def
 
Wie schon gefragt:

Wozu Konstanten?








PS: Es funktioniert alles, also bis jetz habe ich keine Probleme....^^

DeddyH 17. Jun 2010 18:34

AW: Problem mit ReadString, Immer Def
 
Ganz einfach:
Delphi-Quellcode:
procedure TForm1.Blubb;
begin
  Machwas('Ich bin ein ganz langer String');
end;

procedure TForm1.Bla;
begin
  Machwasanderes('Ich bin ein ganz langer String');
end;

procedure TForm1.Wuppdi;
begin
  Machnochwasanderes('Ich bin ein ganz langer String');
end;
Hier ist 3 mal derselbe String gemeint. Will man den mal ändern, muss man das an allen 3 Stellen tun.

Dazu im Vergleich:
Delphi-Quellcode:
const LangerString = 'Ich bin ein ganz langer String';

procedure TForm1.Blubb;
begin
  Machwas(LangerString);
end;

procedure TForm1.Bla;
begin
  Machwasanderes(LangerString);
end;

procedure TForm1.Wuppdi;
begin
  Machnochwasanderes(LangerString);
end;
Wie oft muss man hier ändern? Kann man sich vertippen, ohne dass der Compiler meckert? Wird der Quelltext kürzer und übersichtlicher? Diese Fragen kannst Du Dir selbst beantworten.

Fussel9 17. Jun 2010 18:44

AW: Problem mit ReadString, Immer Def
 
ok, aber da ich es nur an zweistellen benutze kann ich STRG+C und STRG+V benutzen ;)

DeddyH 17. Jun 2010 18:45

AW: Problem mit ReadString, Immer Def
 
Mach, was Du willst, aber komm mit hinterher nicht an, wenn etwas wegen Tippfehlern danebengeht.


Alle Zeitangaben in WEZ +1. Es ist jetzt 01:47 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 by Thomas Breitkreuz