-
Fototrend

Új hozzászólás Aktív témák
-
föccer
nagyúr
Thx a válaszokat.
Odáig eljutottam, hogy valahogy egész számokat kellene varázsolnom a sok tizedes számokból.
Matematikai algaritmust nem tudtam rá kitalálni, de ez a trunc függvény jónak hangzik
Még szerencse, hogy a megjelenítés inkább csak tájékoztató jellegűnek kell lennnie. Az adatok kiértékelése a rajzolás pillanatában kész van.
Másik kérdés:
Hogyan tudom megoldani, hogy egy kép /a fentebb kirajzolt grafikon/ teljes képernyősen megjelenjen. Akár helyi menü-vel, akár jobb klikkel /lényegtelen/.
Szóval ameddig elvben jutottam:
Az image1 onclick eseményébe kellene irogatni valamit. Talán ha készítek neki egy külön formot, amit maximalizálok, és erre teszek ki egy nagyobb változatot?
Vagy van ennél egyszerübb megoldás is?
/sry a láma fogalmazásért, de messze nem vagyok programozó... /
thx.
föccer -
föccer
nagyúr
hyz.
Adott Delphi 3.1-ben:
Type
Rpont = record
index: integer;
ido: double;
ut: double;
ero: double;
end;
Ameresiadatok = array [0..adatokszama] of Rpont;
valamint
var
nyersadatok: Ameresiadatok;
Feladat:
A tárolt adathalmazból x-> ut; y-> ero grafikont rajzolni.
Amin elindultam:
for i:= 0 to (nyersadatokszama-1) do
begin
x1:= nyersadatok.ut;
x2:= nyersadatok[i+1].ut;
y1:= nyersadatok.ero;
y2:= nyersadatok[i+1].ero;
with form2.Image1.Canvas do
begin
moveto(x1,x2);
lineto(y1,y2);
end;
end;
Ez eleddig mind szép és jó, csak:
Inkompatibilis tipusok: integer-double.
az ut és ero adatok double tipusban vannak tárolva <és előzőekben számolva>.
Kérdésem: Hogyan fogom tudni kirajzoltatni azt az átkos grafokont.
Köszönom a segítséget.
üdv.: föccer
Új hozzászólás Aktív témák
● olvasd el a téma összefoglalót!
- NVIDIA GeForce RTX 5080 / 5090 (GB203 / 202)
- Otthoni hálózat és internet megosztás
- Hegesztés topic
- AMD FX
- Eredeti játékok OFF topik
- Sütés, főzés és konyhai praktikák
- Kertészet, mezőgazdaság topik
- Formula-1
- MWC 2026: Megérkezett a Xiaomi Pad 8 sorozat
- Akciófigyelő: Jelentős kedvezményekkel veheted meg a Xiaomi 17-eket
- További aktív témák...
- 222 - Lenovo LOQ (15IRX10) - Intel Core i5-13450HX, RTX 5050
- HIBÁTLAN iPhone 12 mini 64GB Black -1 ÉV GARANCIA - Kártyafüggetlen, MS3818
- HP EliteBook 855 G7 15,6" Ryzen 5 PRO 4650U, 16GB RAM, 256GB SSD, jó akku, számla, 6 hó gar
- Bomba ár! Dell Latitude 5490 - i5-8GEN I 8GB I 500GB i 14" HD I HDMI I Cam I W10 I Gari!
- Lenovo ThinkPad L13 Gen 3 i5-1245U FHD+ 16GB 512GB 1 év teljeskörű garancia
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest


