Kezdem kapizsgálni a dolgokat.

Újab kérdés (szólj ha unod)
Felraktam ugye a FireBirdet, kaptam egy SuperServert (mert megérdemlem)

De mi az a ''kliens'' hozzá?
Mire jó? Eddig úgy tudtam az alkalmazások a ''kliensek''...

Az alkalmazások valóban lehetnek kliensek de kell egy közvetítő réteg ami az alkalmazás (üzleti logika) kéréseit továbbítja az adatbáziskezelő szerver felé, illetve a válaszokat továbbítja az alkalmazás felé. Az FB-nél ez a ''kliens'' egy dll. Ilyen szempontból az ISQL is egy alkalmazás ami a felhasználó által beírt sql parancsokat továbbpasszolja az adatbázis kliensnek (fbclient.dll) és a szerver válaszait pedig kiírja a képernyőre.

IBX komponenscsomag => Ez alapból benne van a Delphi-ben? (6 Pro)

Vagy egy külsőleg telepítendő ''cucc''?

Tiszteletem.
No, ha mar igy is megvan a topic, hasznalnam...

Nagy problemam: EditBoxokba ListBoxbol drag&droppal tennem a cuccokat, es meg szeretnem akadalyozni, hogy normalisan szoveget irhassak be.
Erre - gondoltam en - jo lesz, ha siman OnKeyDown(/Press/Up)-ra csinalok egy
With Sender As TEdit Do
Text:=´´;
eventkezelest. De nem. Mindenkepp berakja a Key-t is, amit az eventtol kap.

Nincs valami, ami kiveszi a Key-t, pl. vmi fFlush vagy hasonlo?

(Jo, persze megcsinalom OnChange-re Listaban-Van-E-Az-Uj-Szoveg - ellenorzessel, de azert erdekelne.)

Használd a ReadOnly property-t.

Az OnKeyPress stb. események Key paramétere ''var'' típusú, és ha azt akarod, hogy a Delphi ne kezelje le, visszatérés előtt ki kell nulláznod (#0).
(De ezzel nem zártad ki az egér Paste műveletét!)

Hmm.
Van benne valami...köszönöm.
Kipróba, és ha okés, legközelebb jobban szétnézek : )

Azért nekem is van más dolgom mint a gép előtt ülni

Lásd Interbase fül(ek)

Az ilyen segítőkész emberek komolyan felbecsülhetetlenek

Köszönöm a válaszaidat.
(balszerencsédre) igérem jelentkezni fogok még

Egyelőre találtam egy korrektnek tűnő dokumenumot ami kitárgyalja a Delphi <-> IB kapcsolatokat. Bővebben: link Remélem érthető lesz, ha nem nem azt észre fogod venni

[Szerkesztve]

Sziasztok!

Lenne egy nagy kérdésem.
Hogy lehet meghatározni a következőket: -legkissebb közös többszörös
- legnagyobb közös osztó
-relatív prímek!

Segítsetek!

HIHI
Az osztoit igy lehet meghatarozni egy szamnak (pascal megoldas, c-ben is kuldhetem, ha kell):

{osztoi.pas}
uses crt;
var a, b, szam, r , i, h,g : longint;
aszamai, bszamai: array [1..200] of longint;
begin
writeln('Kerem az ''A'' erteket');
readln(a);
writeln('Kerem a ''B'' erteket');
readln(b);
clrscr;
writeln('A szamai: ');
writeln;
for szam := a downto 1 do
begin
clrscr;
r:=0;
writeln('Most ',szam);
for i:=szam downto 1 do
begin
if szam mod i = 0 then

begin
writeln(szam div i);
inc(r);
aszamai[r]:=szam div i;
end;

end;
writeln;
writeln;
h:=r;
writeln('Ez osszesen ',r,' szam volt');
readkey;
end;

clrscr;
writeln('B szamai: ');
writeln;
for szam := b downto 1 do
begin
clrscr;
r:=0;
writeln('Most ',szam);
for i:=szam downto 1 do
begin
if szam mod i = 0 then

begin
writeln(szam div i);
inc(r);
bszamai[r]:=szam div i;
end;

end;
writeln;
writeln;
g:=r;
writeln('Ez osszesen ',r,' szam volt');
readkey;

writeln('Kozos osztoik: ');
for i:=1 to h do for r:=1 to g do if r = i then writeln(i);

end.

Ez egy eleg hosszu megoldas, igazabol nagyon is rogtonzott, lehet, hogy van benne hiba.

Legnagyobb kozos osztot ugyan ezen az alapon, csak egy kicsit kell rajta szerkeszteni, a relatív prímek csak egy kicsit belenyulni a legnagyobb kozos oszto progi
De juteszembe: if r = 1 then writeln('RELATÍV PRÍMEK!');
Ha kell meg tudom csinalni a tobbit is!

[Szerkesztve]

KovacsUr vloszinuleg ki fogja szedni, akkor e-mailben elkuldom

LNKO és relatív prím algoritmus:
pl. Bővebben: link
vagy: Bővebben: link

[Szerkesztve]

Akinek kérdése van, jöjjön el az induló Source Land-re és tegye fel ott is:

Bővebben: link

Üdv mindenkinek!

Engedelmetekkel használnám én is ezt a topicot...

A következő lenne a kérdésem:
Hogyan tudok egy ProgressBar komponenst beletenni egy valamilyen listakezelőbe (StringGrid/ListView/ListBox vagy valami hasonló)?

Előre is köszönöm!

hat, talan magat a komponenst is bele lehet gyomoszolni, en mindenesetre custom draw-t hasznalnek es magam rajzolnam a progress bart a cellaba vagy sorba (attol fugg ugye hogy mit hasznalsz).

peldaul ha listview-nal maradunk, akkor a CustomDrawSubItem eventben lehet sajatokat alkotni.
nagyjabol arrol van szo hogy:
Item.DisplayRect(drBounds) a negyszogedet adja amit ippen rajzolsz;
Sender.Canvas.Brush.Color es Style amivel beallitod a szint es stilust;
FrameRect es FillRect ami tenyleg kirajzolja a rectangle-t;
aztan ezt akkorara rajzolod amit a progress-ed megkovetel. de teljesen ki tudod elni magad, azt teszel bele amit akarsz

csak elkezdeni nehez, aztan eleg elvezetes rajzolgatni.

Köszönöm!

Este rárontok a témára !

lenne nekem is egy kerdesem.
megfordult a fejemben eleg erosen, hogy szeretnek nehany kulonleges form megjelenulest csinalni - arra gondolok ahogy elobukkan egy uj form a kepernyon.

egy bitmapet mar lehet csurni-csavarni, szoval ugy gondolom, hogy az lenne a modja a dolognak, hogy
- megrajzolni a formot egy bitmapre (vagy megtalalni hogy a memoriaban hova rajzolodik es arra egy 'capture' szeru dolog?)
- aztan ez a kepet kicsavarni a kepernyore csilivili modon,
- megjeleniteni (folerajzolni) az igazi formot az igazi objektumokkal hogy ugyi mukodhessen.
- letorolni a bitmapet a form mogul.

azt hiszem kellene valami a form create es a form show kozott. mondhatna az ember hogy a show elott a form grafikailag nem letezik, de akkor a doublebuffer hogy mukodik? hisz az azzal kerkedik hogy eloszor megrajzolja a formot aztan egy lepesben megjeleniti!