- ASUS ROG Ally
- Milyen videókártyát?
- Nem indul és mi a baja a gépemnek topik
- AMD K6-III, és minden ami RETRO - Oldschool tuning
- Milyen billentyűzetet vegyek?
- Megjöttek a be quiet! Pure Loop 3 sorozatú kompakt AIO-i
- Intel Core Ultra 3, Core Ultra 5, Ultra 7, Ultra 9 "Arrow Lake" LGA 1851
- RAM topik
- Notebook hibák
- Projektor topic
Új hozzászólás Aktív témák
-
bukica
csendes tag
Egy másik problémám, hogy lehet egy 'státusz' sort kitenni egy form-ra, hogy azon programfutás közben különböző dolgokat ki tudjak írni (rekord számláláló,üzenetek stb.), és ezek azonnal meg is jelenjenek, nem csak akkor mikor az adott feladat lefutott?
Nem tudom elég érthetően fogalmaztam-e? Pl. egy indexelés előtt ki akarom írni, hogy 'Türelem indexelés', majd mikor az indexelés lefutott, eltüntetni az üzenetet? -
-
bukica
csendes tag
Oké köszi ezt Én is kipróbáltam, és jó is, csak a font charsetet ANSI_CHARSET-re kell állítani, akkor jelenik meg az átmérő jel.
Már csak az az a probléma, hogy a billentyű lenyomásakor a beírja a karaktert, és a kurzor a sor elejére ugrik.
Hogyan lehet azt megoldani, hogy maradjon a szöveg végén a kurzor? -
bukica
csendes tag
Megint lenne egy 'elemi' kérdésem.
Hogy lehet a form-on belül megállapítani,hogy milyen elemről van szó (TEdit, TLabel,TGroupBox, stb.) Pl. egy ciklusban, be akarom álltani, hogy a TEdit mezők Text-je üres legyen.
for j := 0 to Form1.ComponentCount -1 do
begin
if Form1.Components[j].????? egy TEdit then
Tedit(Form1.Components[j]).Text:='';
end;
Vagy van egyszerűbb megoldás is a Form mezők üresítésére? -
bukica
csendes tag
Nagyjából értem, de mi is az a szignatúra? A paraméter megadás? A Delphi 2005 helpjében a
[Delphi] function StrPCopy(Dest: PAnsiChar, const Source: string): PAnsiChar;
található, míg a programban a következőként szerepel:
function ExecAndWait(const FileName: string; const CmdShow: Integer): Longword;
var { by Pat Ritchey }
zAppName: array[0..512] of Char;
zCurDir: array[0..255] of Char;
WorkDir: string;
StartupInfo: TStartupInfo;
ProcessInfo: TProcessInformation;
AppIsRunning: DWORD;
begin
StrPCopy(zAppName, FileName);
GetDir(0, WorkDir);
StrPCopy(zCurDir, WorkDir);
FillChar(StartupInfo, SizeOf(StartupInfo), #0);
.
.
end;
Itt az StrPcopy() és a FillChar() -ra is hibát jelez. Mi is akkor a teendő? Próbáljak egy másik függvényt írni helyette?
Bocs, hogy sokat kérdezek, de szeretném megérteni, ill. megcsinálni a progit, hogy működjön. -
bukica
csendes tag
Ezek szerint azt mondod, hogy pl. egy Delphi 3 alatt működő progit nem tudok lefofdítani Delphi 2005 és Delphi 8 alatt? Hát ez nekem egy kicsit magas.
Én azt hittem, hogy lefele kompatibilisek ezek a progik. Egyébként a Delphi 2005 helpjében megtaláltam az StrPCopy-t, azt írja, hogy a SysUtils-ban van, és mégis azt írja, hogy nemdeklarált vátozó 
. Nem értem. -
bukica
csendes tag
Sziasztok!
Kezdő vagyok Delhiben.
Az StrPCopy() függvényt szeretném használni, de fordításkor mindig kiírja, hogy 'undeclared Identifier: StrPCopy'. Több progit is találtam már a neten, ami ezt használja, de egyiket sem sikerült lefordítanom, mindegyiknél ezt a hibát írja ki. Próbáltam 8-as és a 2005-ös Delphivel is. Mi lehet a gond, mi marad ki a progiból?
Én azt hittem, hogy lefele kompatibilisek ezek a progik. Egyébként a Delphi 2005 helpjében megtaláltam az StrPCopy-t, azt írja, hogy a SysUtils-ban van, és mégis azt írja, hogy nemdeklarált vátozó 
. Nem értem.Új hozzászólás Aktív témák
Hirdetés
- ÁRCSÖKKENTÉS Dell Latitude E6320 notebook eladó
- Új Acer Predator 16 WQXGA 165Hz G-Sync i9-13900HX 16GB 1TB Nvidia RTX 4070 8GB 140W Win11 Garancia
- Samsung Galaxy S23 Plus / 8/512GB / Kártyafüggetlen / 12 Hó Garancia
- Apple iPhone 13 128GB, Kártyafüggetlen, 1 Év Garanciával
- Eladó karcmentes Honor 20e 4/64GB / kék / 12 hó jótállással
Állásajánlatok
Cég: FOTC
Város: Budapest