![]() |
Delphi-Version: 10 Seattle
FixInsight Warnung eliminieren
Ich hab da ein kleines Codestück, das mir FixInsight bemängelt und ich steh grad aufm Schlauch, wie ich das Lösen soll. Ich hab ein TTabControl mit einem TTabItem, dem ich zur Laufzeit eventuell noch weitere TTabItems hinzufügen muss. Das erledigt folgendes Blöcklein:
Delphi-Quellcode:
Jetzt bemerkt FixInsight ganz richtig, daß der Wert von i nicht verwendet wird...aber wie soll ich das sonst machen? :gruebel:
if numDevs > 1 then
begin for i := 2 to numDevs do // Ein Tab haben wir bereits...wir fügen nur die zusätzlichen hinzu begin DeviceTab.Add(nil); end; end; Da muss es etwas einfaches geben, aber ich komm grad nicht drauf. Sherlock |
AW: FixInsight Warnung eliminieren
Delphi-Quellcode:
:gruebel:
repeat
DeviceTab.Add(nil); until (DeviceTab.Count = numDevs); |
AW: FixInsight Warnung eliminieren
<Homer>D'oh!</Homer>
Sherlock |
AW: FixInsight Warnung eliminieren
Wenn du eine while-Schleife nimmst, sparst du dir sogar noch die if-Abfrage.
Delphi-Quellcode:
while (DeviceTab.Count < numDevs) do
DeviceTab.Add(nil); |
AW: FixInsight Warnung eliminieren
:oops:
Betriebsblindheit ist immer noch eine akzeptable Entschuldigung, oder? Ich würde sogar noch eine Prise Urlaubsreife hinzugeben. Sherlock |
AW: FixInsight Warnung eliminieren
Ein blindes
Delphi-Quellcode:
hilft immer und der Compiler opimiert sowas auch nie weg. :stupid::angle2:
if i=0 then ;
|
AW: FixInsight Warnung eliminieren
Das wär mir dann doch zu billig gewesen :stupid:
Sherlock |
AW: FixInsight Warnung eliminieren
Sowas ist manchmal zum Debuggen ganz nett, da wo der Debugger meint die Variable sei entfernt, weil der die nur kurz in den Registern hatte und sie nicht auf dem Stack liegen.
Und das IF war doch auch so schon überflüssig, denn
Delphi-Quellcode:
mit i < 2 macht ja nichts, außer bei downto.
for i := 2 to i do
|
AW: FixInsight Warnung eliminieren
...und da ist die dritte Variante, um meine Schande komplett zu machen. :pale:
Wenn sich das jetzt noch über mehrere Seiten ausdehnt, werde ich in Betracht ziehen, eine Weile keine Fragen mehr zu stellen. ;) Sherlock |
AW: FixInsight Warnung eliminieren
Das 5 Leerzeichen in Zeile 438 war auch überflüssig.
Tschuldschung, aber wünsch dennoch einen schönen Tag. :cheer: Aber noch sind wir ja noch auf Seite 1. :duck: |
Alle Zeitangaben in WEZ +1. Es ist jetzt 14:52 Uhr. |
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