- Három játékprofillal készült az új Arc meghajtó
- Befutottak a beágyazott rendszerekbe szánt, tempós Ryzenek
- Mi történik a szemeddel, ha napi 8 órát monitort nézel? | Orvos válaszol
- A Synology visszatáncolt a saját márkás HDD-k megkövetelésének kapcsán
- 350 Hz-es IPS kijelzővel gyarapodott a Samsung portfóliója
- Már nem tudni, hogy mikor kerülhetnek piacra a DGX Spark gépek
- ThinkPad (NEM IdeaPad)
- Kormányok / autós szimulátorok topikja
- OLED TV topic
- A karmos/ujjbegyes fogásokkal nyomulók örömére megjött az Arye szénszálas egere
- Milyen billentyűzetet vegyek?
- Milyen videókártyát?
- Gaming notebook topik
- Milyen TV-t vegyek?
- Épített vízhűtés (nem kompakt) topic
Aktív témák
-
Tütüm
aktív tag
válasz
Alvin_ti4200 #29 üzenetére
Hello!
Átküldenéd az emilemre nekem is a zip-eket?Igazából a tömbös anyagrész ami homály nagyon.Nem tudod véletlen 16-os tankör mikor ír? -
launcser
senior tag
válasz
Alvin_ti4200 #29 üzenetére
ha kiszámolom akkor kb annyi lehet
ő is itt tanult, mint mérnöktanár azt ittragadt
talán 2 éve végzett vagy 3, eszerint számolj
25 kb +-1 -
launcser
senior tag
válasz
Alvin_ti4200 #25 üzenetére
ő Edit, nem TEdit
Ákos poénkodott ezzel, hogy TÁkos :)
edit rendes, de a zh-knál nem enged puskázni, vigyázz -
[amne]
senior tag
válasz
Alvin_ti4200 #23 üzenetére
Mél ment szintén
de itt is köszi. -
Alan
aktív tag
válasz
Alvin_ti4200 #25 üzenetére
Aha, köszi.
-
Alan
aktív tag
válasz
Alvin_ti4200 #1 üzenetére
Kíváncsiságból megkérdezhetem, ki tanítja a Delphi-t abban a tankörben?
(Nagy I.? Belléné? Csapóné? Vámossy Z.?) -
steveetm
őstag
Még annyit ehhez, hogy ha nem tudná számmá konvertálni a hovát, attól nem kell kivételkezelés, hanem egy input mask ot kell adni annak az editnek, és nem is tud bele más írni csak számot(bár lehet az mask edit, de mindeképp eccerübb mint most kivételeket is felvázolni...)
Üdv.: steveetm -
[amne]
senior tag
válasz
Alvin_ti4200 #1 üzenetére
Nagy vonalakban fel tudnád vázolni miket tanultunk eddig? Elkészített programok működése, lényege is érdekelne. Thx!
-
KovacsUr
addikt
Jah, mondjuk még annyit, hogy most így semmit nem csinálsz a beszúrás után az eredménnyel...
procedure TForm1.Beszrs1Click(Sender: TObject);
var
mit, mibe:string;
hova:integer;
begin
mit := edit4.Text;
mibe := edit3.Text;
hova := StrToInt(edit5.Text);
Insert(mit, mibe, hova);
{Ha valahol meg akarod jeleníteni, akkor még kell vmi ilyesmi:}
edit3.Text := mit;
end; -
KovacsUr
addikt
Ümm... várj, lehet, hogy csak nem tetted bele a uses-be a SysUtils-t (mondjuk nem is mondtam)...
-
KovacsUr
addikt
válasz
Alvin_ti4200 #12 üzenetére
Eh. Kicsit bővebben? :) Mi a hiba?
Lehet, hogy régi delphit használsz, amiben még nincs ilyen. Akkor próbálj
StrToInt(Hova.Text)
-et használni. -
KovacsUr
addikt
Na, most összeállt az egész. :DDD
Értem. Van 3 edited, ezekben a három paraméter, és végre kell hajtani.
Legyen Mit, Mibe, Hova a három TEdit neve.
s := Mit.Text;
Insert(s, Mibe.Text, StrToIntDef(Hova.Text,0)); -
KovacsUr
addikt
válasz
Alvin_ti4200 #5 üzenetére
Ó. RTFM :), de azért
procedure Insert(const InsertStr: string; var TargetStr: string; Position: Integer);
van pld. egy s stringed:
var s: string;
s := '123456';
Insert('abc', s, 3);
ezek után az s értéke '12abc3456' lesz. -
[amne]
senior tag
válasz
Alvin_ti4200 #5 üzenetére
prog. zh. BMF-en jövőhéten mi? :) Melyik tankörben vagy amúgy? El tudnád mondani hogy miket tanultunk mert órákat szelektáltam. Amúgy a kérdést nem értem, válaszolni se tok ;]
-
KovacsUr
addikt
válasz
Alvin_ti4200 #1 üzenetére
Nem egészen értem... String parancs nincs, a string egy beépített adattípus szöveges adatok tárolására. Mit szeretnél csinálni?
-
Alvin_ti4200
félisten
Ez a kérdés. Van 3 edit (mit, mibe, hova). Hogyan néz ki a forráskód?
Aktív témák
- Brogyi: CTEK akkumulátor töltő és másolatai
- Audi, Cupra, Seat, Skoda, Volkswagen topik
- Honor 200 Pro - mobilportré
- iPhone topik
- Samsung Galaxy S23 Ultra - non plus ultra
- Nagyon apró félokos a HMD új mobilja
- exHWSW - Értünk mindenhez IS
- Automata kávégépek
- Borderlands 4
- ASZTALI GÉP / ALKATRÉSZ beárazás
- További aktív témák...
- AKCIÓ! Apple MacBook Pro 16 M4 Max 36GB RAM 1TB SSD macbook garanciával hibátlan működéssel
- Hp Prodesk 600 G3/ G5/ G6 SFF/ i5 8-9-10 gen / Elitedesk 800 G4 /Win11- Számla, garancia
- Telefon felvásárlás!! Samsung Galaxy A12/Samsung Galaxy A22/Samsung Galaxy A32/Samsung Galaxy A52
- Intel Core i5 4440 4mag 4szál processzor garanciával hibátlan működéssel
- ÁRGARANCIA!Épített KomPhone Ryzen 7 5700X3D 32/64GB RAM RX 7800 XT 16GB GAMER PC termékbeszámítással
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Cég: Laptopműhely Bt.
Város: Budapest