Legfrissebb anyagok
IT café témák
- Windows 10
- Vodafone otthoni szolgáltatások (TV, internet, telefon)
- A Coca-Cola következő nagy újítása az AI
- Kaspersky Antivirus és Internet Security Fórum
- Facebook és Messenger
- Apple Mac OS X
- Sorra osztja a dollármilliárdokat az USA a chipgyártóknak
- Bittorrent topik
- Amazon
- A Microsoft feltalálta az olcsó AI-t
PROHARDVER! témák
Mobilarena témák
Új hozzászólás Aktív témák
-
killerjohn
addikt
VCL :
TForm
property Components[Index: Integer]: TComponent read GetComponent;
function TComponent.GetComponent(AIndex: Integer): TComponent;
begin
if FComponents = nil then TList.Error(@SListIndexError, AIndex);
Result := FComponents[AIndex];
end;
function TComponent.FindComponent(const AName: string): TComponent;
var
I: Integer;
begin
if (AName <> '') and (FComponents <> nil) then
for I := 0 to FComponents.Count - 1 do
begin
Result := FComponents;
if SameText(Result.FName, AName) then Exit;
end;
Result := nil;
end;
a függvényhíváson belül már a saját, közvetlen elérésű adattagjával dolgozik az osztály, és nem a GetComponent függvényen keresztül ad vissza értéket, amikor a Components[] tömb elemeit olvasod....
Tehát még gyorsabb is.
Új hozzászólás Aktív témák
Aktív témák
- VR topik (Oculus Rift, stb.)
- Windows 10
- LEGO klub
- Vodafone otthoni szolgáltatások (TV, internet, telefon)
- HiFi műszaki szemmel - sztereó hangrendszerek
- Gaming notebook topik
- Gitáros topic
- Garmin Forerunner 165 - alapozó edzés
- A Coca-Cola következő nagy újítása az AI
- OLED TV topic
- További aktív témák...
Új prémium hirdetések
- DJI Mini 4 pro FMC drón - 3 akku, RC2 táv, 2 táska, Filterek, 2025. decemberig garancia, DJI Care
- HP EliteBook 840 G6 i5-8365U 16GB RAM 256GB SSD világító MAGYAR billentyűzet
- Eizo Flexscan EV2450 IPS HDMI 2Év Garanciával MONITORCENTER
- 4070 Ti Aorus Master //KERESEM!!//
- MacBook Air 2017 Mint Az Új/8GB/256ssd/Akku 88%/1 hónap gar./p3365/