AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren

Problem mit FindComponent

Ein Thema von Blackpit · begonnen am 13. Jul 2019 · letzter Beitrag vom 14. Jul 2019
Antwort Antwort
Blackpit

Registriert seit: 27. Feb 2019
27 Beiträge
 
#1

Problem mit FindComponent

  Alt 13. Jul 2019, 21:42
Hallo,
kann mir jemand sagen, warum das nicht geht?
Delphi-Quellcode:
      While not mtdata.Eof do
       Begin
         with TVCheckListBox(FindComponent('lst_ausstattung' + IntToStr(CAT_ID -2))) do
           begin
            // showmessage(mtData.FieldByName('Bezeichnung').asstring); // funktioniert
             Items.Add := mtData.FieldByName('Bezeichnung').AsString; // <= "Ungenügende Parameter" ??
           end;
         mtdata.Next;
        end;
Bin Ratlos?
  Mit Zitat antworten Zitat
Benutzerbild von EWeiss
EWeiss

Registriert seit: 16. Okt 2010
6.580 Beiträge
 
Delphi 2010 Architect
 
#2

AW: Problem mit FindComponent

  Alt 13. Jul 2019, 21:45
Items.Add(mtData.FieldByName('Bezeichnung').AsString); ?

gruss
  Mit Zitat antworten Zitat
DieDolly
Online

Registriert seit: 22. Jun 2018
969 Beiträge
 
#3

AW: Problem mit FindComponent

  Alt 13. Jul 2019, 21:46
Versuch mal
Items.Add(mtData.FieldByName('Bezeichnung').AsString);

Als Tipp noch, schmeiß dieses verpöhnte with raus!
  Mit Zitat antworten Zitat
Benutzerbild von EWeiss
EWeiss

Registriert seit: 16. Okt 2010
6.580 Beiträge
 
Delphi 2010 Architect
 
#4

AW: Problem mit FindComponent

  Alt 13. Jul 2019, 21:48
Versuch mal
Items.Add(mtData.FieldByName('Bezeichnung').AsString);

Als Tipp noch, schmeiß dieses verpöhnte with raus!
Doppelt gemoppelt hält besser

gruss
  Mit Zitat antworten Zitat
Blackpit

Registriert seit: 27. Feb 2019
27 Beiträge
 
#5

AW: Problem mit FindComponent

  Alt 13. Jul 2019, 21:52
DANKE!
Man sollte doch mal schluss machen
Wie sollte es ohne with gehen?

Geändert von Blackpit (13. Jul 2019 um 22:10 Uhr)
  Mit Zitat antworten Zitat
Benutzerbild von EWeiss
EWeiss

Registriert seit: 16. Okt 2010
6.580 Beiträge
 
Delphi 2010 Architect
 
#6

AW: Problem mit FindComponent

  Alt 13. Jul 2019, 21:53
Zitat:
Funktioniert, gibt es eine Erklärung dafür?
Items.Add(.. erwartet einen Parameter

gleicher Fehler
Wie sollte es ohne with gehen?
TVCheckListBox(FindComponent('lst_ausstattung' + IntToStr(CAT_ID -2))).Items.Add(mtData.FieldByName('Bezeichnung').AsString);

gruss

Geändert von EWeiss (13. Jul 2019 um 22:07 Uhr)
  Mit Zitat antworten Zitat
Blackpit

Registriert seit: 27. Feb 2019
27 Beiträge
 
#7

AW: Problem mit FindComponent

  Alt 13. Jul 2019, 22:15
Danke, konsequente OO
  Mit Zitat antworten Zitat
Benutzerbild von EWeiss
EWeiss

Registriert seit: 16. Okt 2010
6.580 Beiträge
 
Delphi 2010 Architect
 
#8

AW: Problem mit FindComponent

  Alt 13. Jul 2019, 22:28
Danke, konsequente OO
Das Problem bei With es schleichen sich sehr schnell Fehler ein zudem kann man ohne besser debuggen..

gruss
  Mit Zitat antworten Zitat
Benutzerbild von jaenicke
jaenicke

Registriert seit: 10. Jun 2003
Ort: Berlin
7.208 Beiträge
 
Delphi 10.2 Tokyo Enterprise
 
#9

AW: Problem mit FindComponent

  Alt 14. Jul 2019, 07:57
So hintereinander gehängt ist es nicht mehr so gut lesbar. So sieht es so ähnlich aus wie mit with, nur besser lesbar (ab Delphi 10.3, davor muss die Variable vorher deklariert werden):
Delphi-Quellcode:
       while not mtdata.Eof do
       begin
         var CurrentListBox := TVCheckListBox(FindComponent('lst_ausstattung' + IntToStr(CAT_ID -2)));
         CurrentListBox.Items.Add(mtData.FieldByName('Bezeichnung').AsString);
         mtdata.Next;
       end;
Sebastian Jänicke
Alle eigenen Projekte sind eingestellt, ebenso meine Homepage, Downloadlinks usw. im Forum bleiben aktiv!
  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 14:21 Uhr.
Powered by vBulletin® Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2019 by Daniel R. Wolf