Hirdetés
- Felháborodott az Apple, a Meta az iPhone-felhasználók üzeneteit akarja olvasni
- A luxusmárkáknak kell a bitcoin, az USA jegybankjának nem
- Letiltja az USA a politikusokat a telefonhívásokról és szöveges üzenetekről
- Nagy áttörés jön a napelemek piacán, nem kell annyi hely a paneleknek
- Belenyúlt az USA az Epic Games igazgatótanácsába, nyomoz az NVIDIA
Új hozzászólás Aktív témák
-
Robiba
tag
Hááát, ha még ezek után sem megy: #686
A 2.-t ne csináld, elég gáz, inkább saját komponenst kellene írni rá.
A #688-ra: milyen változóba?
Tessék, beírom egy string változóba:
var
Vissza:String;
begin
Vissza:=ReverseString(Edit1.Text);
end;Billentyűzet hiba! Nyomjon F1-et a folytatáshoz!
-
Robiba
tag
válasz killerjohn #686 üzenetére
2. Vissza:=ReverseString(Eredeti);
1. A fentit használhatod az Edit OnChange eseményében.Billentyűzet hiba! Nyomjon F1-et a folytatáshoz!
-
Robiba
tag
var
Form1: TForm1;
i1, i2:integer;
tomb:array [0..3] of string = ('Edit1','Edit2','Edit3','Edit4');
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
for i1:=0 to 3 do begin
for i2:=0 to Form1.ComponentCount-1 do begin
if (Components[i2].Name=tomb[i1]) and (Components[i2] is TEdit) then begin
(Components[i2] as TEdit).Text:='Akármi';
break;
end;
end;
end;
end;Billentyűzet hiba! Nyomjon F1-et a folytatáshoz!
-
Robiba
tag
Új hozzászólás Aktív témák
- Mikrokontrollerek Arduino környezetben (programozás, építés, tippek)
- AMD K6-III, és minden ami RETRO - Oldschool tuning
- Már nem okoz teljesítményvesztést az új NVIDIA App
- Robotporszívók
- AMD GPU-k jövője - amit tudni vélünk
- Milyen notebookot vegyek?
- Milyen TV-t vegyek?
- OpenMediaVault
- eGPU tapasztalatok
- Milyen házat vegyek?
- További aktív témák...
- Xbox Series X Black 1TB dobozos konzol
- Fehér Villám új GAMER PC 2év garancia / NVIDIA GTX1660Super / Ryzen5 / 16GB DDR4 /
- ASUS ROG Zephyrus G14 -14" WUXGA IPS 144Hz -Ryzen 7 6800HS - 16GB - 512GB - RX 6700S 8GB - 1 év gari
- HP Elitebook x360 G6 2in1 Prémium laptop 14" FULL HD IPS Érintőkijelző / Intel I7 / 16GB RAM
- HP Elitebook x360 G7 2in1 Prémium laptop 14" FULL HD IPS Érintőkijelző / Intel I7 / 16GB RAM
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest