Hollosi Information eXchange /HIX/
HIX CODER 492
Copyright (C) HIX
1999-06-16
Új cikk beküldése (a cikk tartalma az író felelőssége)
Megrendelés Lemondás
1 Re: oroknaptar (mind)  5 sor     (cikkei)
2 Re: mem rezidens proggy -->Mc (mind)  41 sor     (cikkei)
3 RE: Matematikusok (mind)  12 sor     (cikkei)
4 1k-s mezo SQL -ben (mind)  14 sor     (cikkei)
5 Re: VFP DataSession (mind)  29 sor     (cikkei)
6 oroknaptar (mind)  135 sor     (cikkei)
7 Re: oroknaptar (mind)  60 sor     (cikkei)
8 Re: [C++] Tomb (mind)  18 sor     (cikkei)
9 windows rtf+lock (mind)  16 sor     (cikkei)
10 Re: Delphi kerdes (mind)  11 sor     (cikkei)
11 Re: Delphi 3.0 adatbaziskezeles (mind)  18 sor     (cikkei)
12 Re: SQL (2) (mind)  21 sor     (cikkei)
13 Re: oroknaptar (mind)  15 sor     (cikkei)

+ - Re: oroknaptar (mind) VÁLASZ  Feladó: (cikkei)

> Szuksegem lenne oroknaptar tablazatra es vagy algoritmusra.

http://www.interlog.com/~r937/doomsday.html

z2
+ - Re: mem rezidens proggy -->Mc (mind) VÁLASZ  Feladó: (cikkei)

Hi inet,"HIX CODER" >!

iC> Az lenne a kérdésem, hogy ha írok egy memóriarezidens programot TP7-ben,
iC> hogyan tudom azt később kitörölni onnan (pl. ha mégegyszer lefuttatom egy
iC> /u paraméterrel), és azt megoldani, hogy ha már egyszer benn van a
iC> memóriában, akkor ne induljon el újra (és figyelmeztessen)?
sza'l az install csekk igen 1xu... foxx valami sztringet a proggyba,
es az lesz az id-d... asztan asztan szepen vegignezed a psp elott
levo osszes szegmenst /a +felelo offszeten persze;)/ hogy vajon van-e
ott oyan id sztring... ha van, akkor mar be vagy toltve... ize...
vagy egy masik megoldas, hogy atveszel 1 +szakitast, es annak 1 bizonyos
bejovetelere lesz 1 bizonyos kimenetel.. vagy 1 adott interrupt rutin
utan mittomenhany bayttal van egy id... vagy stb.. sza'l erre 1543534523
fele moccer van... na... ha mar megtalaltad magad valamiyen uton modon,
akkor mar hozza tucc ferni a beltootott proggy adatajihoz... /mer'hogy
pont ott lesznek ahol az aktualisan futoje, csak eppen 1 masik szegmensbe..
na sza'l akko' yon az, hogy +nezed, hogy az atvett interruptokat nem vette-e
at valaki utanad is.. ha igen, akko' yon a 'baj van baj, gyenge a fu
huje a felhasznalo' [tcs utan szabadon] cimu hibauzenet...;))) ha nem
vette at utanad semmi, na akkor izibe megszakitasok visszaallit, es
egy 'dosos' freememet nyomsz a tsr proggy psp-jere... /esetleg az enviroment
szegmensre is..;)/ oszt akko' telleg siraj, mer' akko' amiko' kilepsz,
akko' fel fog szabadulni az a memorija, es akko' annyival tobb lesz..
stb...;)))

iC> Valamint más programokat is le lehet-e ölni egy adott programból?
iC> ASM betét is jó lesz. ( Nem hiszem, hogy simán pascalban könnyü lenne...)
igen, csak ez mar egy kicsit trukkosebb.... sza'l minden 1es proggy
inditasa elott elmented az aktulais megszakitastablat /0:0 cimen
256*4 byte;). es amikor megnyomjak a gombot, akkor eszt nagyon
ugyesen visszatoltod, es az aktualis proggy psp-jenek 0. bytejara
ugrasz... /mivelhogy ott egy int 20h van, amire biza a proggy
szepen abba fog fejezni minden faszkodast, es ugy ahogy van,
ki fog lepni... /meg arra se lesz ideje, hogy a kepernyot
valami emesztheto 'byebye' uzenettel teleszemetejje...;)))))))
persze a moccer nem bugtalan, mivel ha a proggy valami oyan
dologgal okoskodik, amivel nem kene /pl kitolt egy korabbi
tsr proggyt, vagy valami hasollok;)/ akkor persze fagyi lehet...
de csak ugy poyen kedveye' meg lehet csinalni, izgis yatek...;)))

na yo kodolast... maradok tisztelettel: Mc
+ - RE: Matematikusok (mind) VÁLASZ  Feladó: (cikkei)

Sziasztok

Ez nagyon egyszeru. Ket ponton atmeno egyenes egyenletet
felirod ketszer, ami igy szol:
(x-x1)*(y2-y1)=(y-y1)*(x2-x1)
Ezt felirod ket egyenesre. x1;y1 az egyik, x2;y2 a masik pont az egyenesen. 
Ez ugye ket egyenlet es ket ismeretlen. 
x es y, a metszespont koordinatai.

Udv: McMacee
Ha az iskola az eletre keszit fel, nem felek a halaltol...
If school prepares us for life, I don't afraid of death...
+ - 1k-s mezo SQL -ben (mind) VÁLASZ  Feladó: (cikkei)

Hi !

Inkabb kerdes ez mint valasz, meg kezdonek is csak tulzassal mernem
magam nevezni SQL-ben. 

Szoval nekem mintha az remlene, hogy letezik a BLOB mezo az SQL-ben is.
Ez nem jo 1k meretu adat tarolasara ?

Ilyesmit biztos implementalnak minden epkezlab SQL kezeloben.

Udv:
-- 
Csiszar L.
http://www.stadium.hu/szt/
+ - Re: VFP DataSession (mind) VÁLASZ  Feladó: (cikkei)

Hali!

>Visual Foxpro 5.0-ban egy ablak DataSession tulajdonságát private-ra
>állítva,mégsem ugy műkodik,ahogyan a programot duplán elindítva
>működne.

Ki mondta, hogy ugy kene mukodnie?

>Részben jó,mert a rekordmutató valóban függetlenül
>mozgatható,az egymás után elindított ablakokban de pl. az egyik
>ablakban Set filtert használva majd a másik ablakra visszalépve és
>egy másféle filtert megadva az előző ablak (listbox) vezérlései
>vidáman követik az újabb változást.

Vannak olyan SET.. utasitasok, melyeknek hatokore csak az aktiv DataSession
es vannak olyanok, melyeknek hatokore a tabla vagy alias. A SET FILTER ez
utobbiak koze tartozik. A helpben a SET DataSession Commandnal vannak
felsorolva azok a SET utasitasok amik csak az aktiv DataSessionra hatnak.

>Valamit rosszul csinálok,vagy a Datasession variálásával nem lehet
>tökéletesen  függetlenné tenni az ablakokat?

Nyisd meg kulonbozo alias nevekkel tobbszor ugyanazt a tabat, vagy ami ezzel
egyenerteku a kulonbozo formokon a cursor alias propertyjet allitsd
kulonbozore,  a filter csak az aktiv aliasra vonatkozik, a DataSessiont
hagyhatod default-on is vagy allithatod private-ra mind1.

Udv
-banjo-
+ - oroknaptar (mind) VÁLASZ  Feladó: (cikkei)

>Szuksegem lenne oroknaptar tablazatra es vagy algoritmusra.

Itt egy:

function nap(N,H,E:integer):integer;
(* A dátumból a hét megfelelö napját adja vissza, 0=vasárnap, 1=hétfö,
   stb.
  Paramétertartomány: N:1..31, H:1..12, E:1901..2099   *)

  var v, index: integer;
  begin
    case H of
      2,6  :  v:=0;
      8    :  v:=4;
      10   :  v:=8;
      9,12 :  v:=12;
      3,11 :  v:=16;
      1,5  :  v:=20;
      4,7  :  v:=24;
    end; (* case *)
    index:=((E-21) mod 28) + v + ord(H>2);
    nap:=pred(((index + (index div 4)) mod 7) + N) mod 7;
  end; (* függvény *)

  Forrás: CHIP, Juni 1988, p. 187.

Itt egy masik...

unit Zeller;
{ Calendar functions }

interface

const
  { Day-of-week constants, returned by Date2DOW }
  dowSA = 0; dowSU = 1; dowMO = 2; dowTU = 3; dowWE = 4; dowTH = 5;
  dowFR = 6;
type
  TDate = record
    Y, M, D : word;
    end;

function ValidDate (Date : TDate) : Boolean;
{ Decides whether a date is valid or not                                   }

function Date2DOW (Date : TDate) : byte;
{ Converts a date into a day-of-week value (one of the dowXXX constants)   }
{ using Zeller's famous closed-formula algorithm                           }

function Date2Num (Date : TDate) : longint;
{ Converts a date into an ordinal value (days passed after 01/01/0001 AD)  }

procedure Num2Date (Ordinal : longint; var Date : TDate);
{ Converts an ordinal value (days passed after 01/01/0001 AD) into a date  }

implementation
const
  MonthLen : array [Boolean, 1..12] of word =
    ((31,28,31,30,31,30,31,31,30,31,30,31),
     (31,29,31,30,31,30,31,31,30,31,30,31));

function LeapYear (Y : word) : Boolean;
.

>geppel akarom megmondani egy datumrol (pl. 1999/08/27) milyen nap es
>hanyadik nap az evben (a munka het kiszamitas miat fontos (nemetek
>nagyon hasznaljak)) ja es persze hogy letezo datum (pl 1999/02/31)

Egyszeruen ellenorizd, hogy a honap (1..12) es a nap (1..31) lehetse-
ges-e. Bonyolithatod honap-fuggo utolso-nappal.

Veres Sandor

(Elnezest, jo hosszu lett...)
+ - Re: oroknaptar (mind) VÁLASZ  Feladó: (cikkei)

On 14 Jun 99 at 2:32,  wrote:

> Szuksegem lenne oroknaptar tablazatra es vagy algoritmusra.
> 
> geppel akarom megmondani egy datumrol (pl. 1999/08/27) milyen nap es
> hanyadik nap az evben (a munka het kiszamitas miat fontos (nemetek nagyon
> hasznaljak)) ja es persze hogy letezo datum (pl 1999/02/31)

Nem irtal reszleteket, ugyhogy feltetelezem, hogy C-ben kellene:

  char *hetnap[] = {"Vasarnap","Hetfo","Kedd", "Szerda",
                    "Csutortok","Pentek","Szombat"};
  struct tm datum;

  datum.tm_year = year - 1900;
  datum.tm_mon = month - 1;
  datum.tm_mday = day;
  datum.tm_hour=datum.tm_min=datum.tm_sec = 0;
  datum.tm_isdst = 0; /* DST ne kavarjon */

  if (-1 == (int) mktime(&datum) || datum.mday != day) {
    fprintf(stderr, "Rossz datum!\n");
    exit(1);
  }

  printf("%s, %d. nap\n", hetnap[datum.tm_wday], datum.tm_yday + 1);

A (datum.mday != day) ellenorzesre azert van szukseg, mert az mktime 
normalizalja a datumot, tehat pl. 1999 dec 32-bol 2000 jan 1-et 
csinal. (Ebbol is latszik, hogy Y2K kompatibilis! :) Ja, ez 1970-tol 
2036-ig vagy meddig jo 32 bites processzoron.

Ha viszont asm-ben kellene (mivel asm dolgokat szoktal kerdezni...) 
akkor hosszabb lesz. Szamold meg, hogy pl. 1900 jan 1-tol mennyi nap 
telt el a datumig, es modulo 7 adja a het napjat (hogy milyen nap 
volt akkor, az majd kijohet a vegen, amikor a mai napot ellenorzod 
vele). Annyit kell meg tudni, hogy a szokoevek azok a 4-gyel oszthato 
evek, amik nem oszthatok 100-zal, vagy oszthatok 400-zal is!
(Tehat 1900 nem szokoev, de 2000 igen.)

Az eltelt napok algoritmusa durvan mondjuk ilyesmi is lehet (C-ben az 
egyszeruseg kedveert.) :

  for (napok=0, i=1900; i<year, i++)
    napok += szokoev(i) ? 365 : 366;

  for (i=1; i<month; i++)
    napok += honapnapjai(year,i);

  if (honapnapjai(year,month) >= day)
    napok += day - 1;
  else
    ... hibajelzes

Lehetne ennel gyorsabbat is irni, de valoszinu, hogy nem a sebesseg a 
szempont. Hibaellenorzeseket is tobb helyen kell beletenni...

István
--  Istvan Marosi  --  http://www.sch.bme.hu/~marosi  --
--  Recosoft Ltd.  --  mailto:  --
+ - Re: [C++] Tomb (mind) VÁLASZ  Feladó: (cikkei)

On 14 Jun 99 at 10:49,  wrote:

>    // 2. ez szebb... (es memoria takarekosabb)
>    char (*ptr)[SLENGTH];
>    ptr=new char[ASIZE][SLENGTH];

Hat, a szepseg szubjektiv dolog, viszont hogy ez nem takarekosabb, az 
biztos: Ugyanugy allokalsz ASIZE*SLENGTH byte-ot, raadasul meg egy 
pointernek is allokalsz helyet, ami a sima tombnel nincs.

Lehet, hogy arra gondoltal a takarekossagnal, hogy mihelyt nincs ra 
szukseg, fel lehet szabaditani? Az elso valtozatodnal lokalis valtozo 
volt a tomb, az is felszabadul automatikusan, mihelyt kilepsz a 
szubrutinbol...

István
--  Istvan Marosi  --  http://www.sch.bme.hu/~marosi  --
--  Recosoft Ltd.  --  mailto:  --
+ - windows rtf+lock (mind) VÁLASZ  Feladó: (cikkei)

haho!

2 kerdesem lenne.

a) szuksegem lenne egy olyan c/c++ libraryra, ami (akar filebol, akar
memoriabol) RTF file-t kinyomtat. (de ha van ilyen MFC class, csak nem
tudok rola, akkor lecci vilagositsatok fel)

b) (ez lehet hogy eleg lamer lesz :-) meg lehet-e windowsban csinalni
valahogy azt, hogy van egy file egy reszen shared lock-om, es azt
lecserelem exclusive lock-ra ugy, hogy kozben nem engedem el egy
pillanatra sem a lockot?

             :alvarez:
]:[http://www.adam.hu/alvarez]
 ... Az egyetlen eselyed az eletbenmaradasra, hogy... Ah, felejtsd el.
+ - Re: Delphi kerdes (mind) VÁLASZ  Feladó: (cikkei)

>Felado :  [Hungary]
>Temakor: Delphi kerdes ( 8 sor )
>
>Volna egy - lehet hogy lamer - kérdésem: hogyan lehet binárisan fájlt
>kezelni Delphi 4.0 alatt? Jelszót szeretnék eltárolni és visszaolvasni,
>ugyanis. Előre is köszönet:

Nezz korul a TFileStream kornyeken! De persze a regi Pascal-os file
fuggvenyek is mennek...

Gabor
+ - Re: Delphi 3.0 adatbaziskezeles (mind) VÁLASZ  Feladó: (cikkei)

>Felado :  [Hungary]
>Temakor: Delphi 3.0 adatbaziskezeles ( 10 sor )
>
>Kezdo vagyok a Delphiben, de szeretnek tobbet tudni az
>adatbaziskezeleserol. (A tobbi resze egyenlore nem erdekel) Jo lenne vagy
>egy csomo peldaprogram, vagy konyv, vagy CD. Dobjatok meg egy cimmel, mit
>erdemes megvenni ?

Eleg sok Delphi konyv letezik, de a legtobbjuk erosen hanyagolja az
adatbazis-kezelest... En talan a Baga Edit fele "Delphi maskepp" c. konyvet
ajanlanam, mert ez kiter az adatbazis-kezeles olyan reszleteire is amelyeket
mas konyvben meg csak nem is lattam (pl. multi-tier, quick-report, stb.)...
Ja, es mindenkeppen erdemes lesz megvenned Stolnicki Gyula "SQL kezikonyv"
nevu iromanyat ami - szerintem - a ma kaphato legjobb SQL referencia-konyv.
Bar szemlatomast alapvetoen inkabb UNIX-os kornyezetrol ir, de nekem nagy
segitsegemre volt Delphi eseten is...

Gabor
+ - Re: SQL (2) (mind) VÁLASZ  Feladó: (cikkei)

>Felado :  [Hungary]
>Temakor: Re: SQL (2) ( 18 sor )
>
>> Felado : Zachar Misi
>> ...
>> Tenyleg nem lehet 1k-s mezot definialni SQL-ben csak valamilyen kulso
>> adatbazis kezelo programmal?
>
>Nem külsö adatbázis kezelö, hanem implementáció.
>Amúgy a
>
>CHAR (1024)
>
>az végülis szintaktikailag helyes, csak éppen az implementációk nem
>szokták szeretni :-)
Nem akarok nagyon belebeszelni, de szerintem a BLOB "mezoket" pontosan ilyen
celokra talaltak ki, nem? Persze lehet, hogy az SQL92-ben nincs benne (ezt
nem tudom, mert nincs meg a spec), de az altalam ismert adatbaziskezelok
mindegyike tamogatja.

Gabor
+ - Re: oroknaptar (mind) VÁLASZ  Feladó: (cikkei)

On Mon, Jun 14, 1999 at 12:32:58AM +0000,  wrote:
> Szuksegem lenne oroknaptar tablazatra es vagy algoritmusra.
> 
> geppel akarom megmondani egy datumrol (pl. 1999/08/27) milyen nap es 
> hanyadik nap az evben (a munka het kiszamitas miat fontos (nemetek nagyon 
> hasznaljak)) ja es persze hogy letezo datum (pl 1999/02/31)

C-ben az mktime() es a localtime() fuggvenyek egesz jok, csak a
datum validitasat nem ellenorzik. ha kell, van egy regebben
eszkabalt programom (~8K), ami nagyon hasonlo funkciot lat el
(megkerdezi a user szuletesi datumat es annak alapjan ir ki
kulonbozo informaciokat)

_tgz
Premature optimization is the root of all evil - Knuth

AGYKONTROLL ALLAT AUTO AZSIA BUDAPEST CODER DOSZ FELVIDEK FILM FILOZOFIA FORUM GURU HANG HIPHOP HIRDETES HIRMONDO HIXDVD HUDOM HUNGARY JATEK KEP KONYHA KONYV KORNYESZ KUKKER KULTURA LINUX MAGELLAN MAHAL MOBIL MOKA MOZAIK NARANCS NARANCS1 NY NYELV OTTHON OTTHONKA PARA RANDI REJTVENY SCM SPORT SZABAD SZALON TANC TIPP TUDOMANY UK UTAZAS UTLEVEL VITA WEBMESTER WINDOWS