AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Win32/Win64 API (native code) Delphi Zugriff auf Variablen im Record wie FindComponent
Thema durchsuchen
Ansicht
Themen-Optionen

Zugriff auf Variablen im Record wie FindComponent

Ein Thema von s.h.a.r.k · begonnen am 8. Jul 2005 · letzter Beitrag vom 8. Jul 2005
 
Benutzerbild von s.h.a.r.k
s.h.a.r.k

Registriert seit: 26. Mai 2004
3.159 Beiträge
 
#3

Re: Zugriff auf Variablen im Record wie FindComponent

  Alt 8. Jul 2005, 13:15
hm... eigentlich ist es nur ein Record und kein TList-Objekt. Es schaut jedenfalls so aus:
Delphi-Quellcode:
type
  TTestRecord = record
    TestString: String;
    TestInteger: Integer;
    TestBoolean: Boolean;
    { etc. }       
  end;
Und in einer anderen Procedure mag ich dann praktisch eine Funktion haben, die wie folgt funktionieren sollte:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
const
  TestRecordVar = 'TestString', 'TestInteger', 'TestBoolean';
var
  i: Integer;
begin
  i := FindRecordVariable(TestRecordVar[1]);
end;
da es nämlich so viel Datensätze sind, mach ich lieber ein Array mit allen Namen und geh das dann die Reihe nach durch -> Schleife. Und muss somit ich nicht immer 100 Datensätze abklappern! Verstehst du was ich meine?!

mfg shark
»Remember, the future maintainer is the person you should be writing code for, not the compiler.« (Nick Hodges)
  Mit Zitat antworten Zitat
 


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 04:25 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