AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren

Komisches String Verhalten?

Ein Thema von AlexII · begonnen am 29. Jan 2014 · letzter Beitrag vom 29. Jan 2014
Antwort Antwort
AlexII

Registriert seit: 28. Apr 2008
1.717 Beiträge
 
FreePascal / Lazarus
 
#1

Komisches String Verhalten?

  Alt 29. Jan 2014, 13:04
Hallo,

ich habe folgendes Problem. Ich verstehe nicht wieso in der Rückgabe bzw. dem Result nicht immer 8 Zeichen bzw. Buchstaben stehen? Sehr oft 8, aber ab und zu gar keine oder nur 3 oder 4... hm... kapiere ich nicht. Ich habe eine Vermutung, dass das irgendwie dann aufkommt, wenn ein Buchstabe mehrmals nacheinander vorkommt, oder irre ich mich da?

Bin für jede Aufklärung dankbar.

Delphi-Quellcode:
function GetPassword(vUpCaseLet: Integer): String;
var
  i : Integer;
  s1 : String;
const
  u : String = 'ABCDEFGHIJKLMNOPQRSTUVWXYZ';
begin
  // Großbuchstaben
  if vUpCaseLet = 1 then
  begin
    s1 := '';
    for i := 1 to 8 do
    begin
      s1 := s1 + u[Random(Length(u) + 1)];
    end;
  end;

  Result := s1;
end;
Bin Hobbyprogrammierer! Meine Fragen beziehen sich meistens auf Lazarus!
  Mit Zitat antworten Zitat
Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
43.017 Beiträge
 
Delphi 12 Athens
 
#2

AW: Komisches String Verhalten?

  Alt 29. Jan 2014, 13:19
Weil das +1 falsch geklammert ist?

Schalte mal in den Projektoptionen die Bereichsprüfung ein.


Und nein, da sind immer 8 Zeichen drin (wenn vUpCaseLet=1), was dir der Debugger bestätigen wird, falls du den mal nutzen solltest.
Aber nicht alle Zeichen werden von allem angezeigt (alles mit PChar dazwischen schneidet z.B. ab einer #0 den String ab)


PS: das vUpCaseLet sieht mir aber arg nach einem "Boolean" aus.
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
my Delphi wish list : BugReports/FeatureRequests

Geändert von himitsu (29. Jan 2014 um 13:22 Uhr)
  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
 
#3

AW: Komisches String Verhalten?

  Alt 29. Jan 2014, 13:35
Eine Warnung müsste der Compiler hier auch ausgeben: sl
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
AlexII

Registriert seit: 28. Apr 2008
1.717 Beiträge
 
FreePascal / Lazarus
 
#4

AW: Komisches String Verhalten?

  Alt 29. Jan 2014, 13:41
Weil das +1 falsch geklammert ist?
Boah... tatsächlich, ich war Betriebsblind.

Schalte mal in den Projektoptionen die Bereichsprüfung ein.
Ich schreibe in diesem Fall mit Lazarus. )))

Und nein, da sind immer 8 Zeichen drin (wenn vUpCaseLet=1), was dir der Debugger bestätigen wird, falls du den mal nutzen solltest.
Aber nicht alle Zeichen werden von allem angezeigt (alles mit PChar dazwischen schneidet z.B. ab einer #0 den String ab)
Habe ich schon vermutet. Danke!

PS: das vUpCaseLet sieht mir aber arg nach einem "Boolean" aus.
Stimmt, muss ich ändern!
Bin Hobbyprogrammierer! Meine Fragen beziehen sich meistens auf Lazarus!
  Mit Zitat antworten Zitat
Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
43.017 Beiträge
 
Delphi 12 Athens
 
#5

AW: Komisches String Verhalten?

  Alt 29. Jan 2014, 14:51
Eine Warnung müsste der Compiler hier auch ausgeben: sl
Kann sein, daß er es nicht macht, da Strings immer initilisiert sind. (sonst würde die Referenzzählung nicht funktionieren)

Ich schreibe in diesem Fall mit Lazarus. )))
Selbst Lazarus müsste Compileroptionen für die Bereichsprüfung ({$R} / {$RANGECHECKS} ) und die Überlaufprüfung ({$Q} / {$OVERFLOWCHECKS} ) kennen.
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
my Delphi wish list : BugReports/FeatureRequests

Geändert von himitsu (29. Jan 2014 um 14:58 Uhr)
  Mit Zitat antworten Zitat
Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

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:21 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