Hello coderek,

Adva van egy ADO kapcsolat egy Access 97 mdb bazishoz. Megvannak a
tablanevek e s azokban a fieldnevek. Ha a Lookup Wizarddal combobox-kent
definialok egy fieldet, akkor az ADOn keresztul egy hogy tudom meg, hogy
az Lookup, es hogyan lehet kiolvasni a lehetseges ertekeket? A fejlesztoi
kornyezet Delphi, viszont tudomasom szerint az ADO egyseges.

Elore is koszonom a segitseget.

--
udvozlettel,
Gergo

> Igazán egyszerű megoldások:
> - minden byte-ot ugyanazzal a byte értékkel XOR-olni, pl 0x55-tel. -
> ennél egyszerűbb
> nem igen van, de igen gyenge, minimális prog tudással törhető - inkább csak
> erkölcsi akadályt állít a juzer elé, de az is valami.
>
> - a fájl minden byte-ját egy fix bytesorozat (kulcs, jelszó) egymást
> követő byt e-jaival ciklikusan kódolni, pl a 0x55 0x22 0x44 0x33
> sorozattal a 0. 1. 2. 3., majd 4. 5. 6. 7. by te-okat stb. ez már fogósabb
> egy mezei juzernek, de egy cracker csak röhögne rajta - ha azon ban a
> kulcs eléggé hosszú és gyakran változik, közelít a törhetetlen felé.

Most volt hasonlo munkam (nekem is az elso VB..:))) es ugyanez volt a kivansag.
Azt csinaltam, hogy irtam egy 32 bites random generatort assembly-ben, ebbol
csinaltam egy DLL-t. Egy tombot toltok vele indulaskor ugy, hogy az elo byte-ba
az elso byte-ra csonkolt random szam, a masodikba a masodik byte-ra csonkolt
random szam, stb.
Aztan ezzel xor-ozom a sajat adataimat. Mint mas is irta, nem
feltorhetetlen, de sokakat visszariaszt, ha elsore latszik, hogy egy kis
munka lenne vele...
Igy hivhato a DLL, tetszoleges induloertekkel: seed=PseRan(seed) A seed long.
Elkuldjem a DLL-t?
---------------------
Mas. Meg nem csinaltam helpet es napok ota nem tudok tuljutni egy hibauzeneten.
Vilagos, hogy en vagyok bena, de hol, merre, miert??? (Alabb mellekelve)
Udv, Rx

Creating the help file FontEdit.hlp.

Processing d:\hlp\FontEdit.rtf
    HC3048: Warning: topic #1 of d:\hlp\FontEdit.rtf :
        Nonscrolling region defined after scrolling region.
    HC3048: Warning: topic #2 of d:\hlp\FontEdit.rtf :
        Nonscrolling region defined after scrolling region.

    HC1010: Note:
        The following mapped Topic IDs were not used in any
topic:
        IDC_HOWTOUSE
        IDC_COMPANY
Resolving keywords...
Adding bitmaps...
2        Topics
0        Jumps
0        Keywords
0        Bitmaps


Created d:\hlp\FontEdit.hlp, 9,089 bytes
Compile time: 0 minutes, 0 seconds
1 note, 2 warnings

HY, coderek

Egy regebbi delphis alkalmazasomat probalom megirni, ugy
mint egy consolos applikaciot, hogy kylixel leforgathassam linux
ala, es ott eg linuxos shellen futtathassam. A technologia adott
csak en vagyok benabb a kelletenel. Tehat akkor a problema
kodokban:

{$APPTYPE CONSOLE}
program TestProg;
uses Windows, SysUtils, Types, Classes, QGraphics,
QControls, QForms, QDialogs,
     QStdCtrls, QextCtrls;
var timer1 : ttimer;
procedure timer1timer(Sender: TObject);
.

Ez tokeletesen lefordul, csak nem tudok esemenykezelot
hozzarendelni az ontimer eventhez. (meg mas komponens
barmeyik eventjehez, ugyanis az !nem szimpla procedure
hanem metodus) Kerdes: hogy nez ki helyesen a kod, es
hogyan tudok egy procedure-bol metodust csinalni.

A valaszokat elore is kosz, vagy ha van valami (barmi ami egy
picit elorebb visz akkor is irj)
Es lecci cc maganba is. thnx
Udv ReLuXa/bagpet