Einzelnen Beitrag anzeigen

simjoh

Registriert seit: 13. Nov 2006
Ort: Asslar
99 Beiträge
 
Delphi 7 Enterprise
 
#1

Speicher auslesen mit Delphi

  Alt 19. Mär 2007, 16:14
Hallo,

bin relativer Neuling was Delphi betrifft. Ich spiele manchmal bei PartyPoker Poker. PartyPoker erstellt in einer Textdatei eine Handhistory der gepielten Hände in einem Verzeichnis auf C:\... Nun möchte ich beim Spielen den Speicher von Partypoker auslesen, um mir ein eigenes Programm zu schreiben, welches als Handhistory-Ticker dient. Es soll also in einem TPanel der aktuelle Zug eines Spielers realtime angezeigt werden. Wie macht man sowas?? So eine Handhistory von PartyPoker sieht dann etwas so aus:

Game #5682398962 starts.

#Game No : 5682398962
***** Hand History for Game 5682398962 *****
$0.25/$0.50 Texas Hold'em - Friday, February 16, 23:59:11 ET 2007
Table Table 126428 (Real Money)
Seat 10 is the button
Total number of players : 9
Seat 1: Chipmunk75 ( $13.95 )
Seat 2: gary133 ( $20.63 )
Seat 3: MrChips__ ( $13.70 )
Seat 6: nutsplayer1 ( $25.45 )
Seat 7: ede3006 ( $13.25 )
Seat 8: johann22111 ( $2.43 )
Seat 9: javabung ( $14.40 )
Seat 10: RecluceTM ( $14.85 )
Seat 4: Jojo ( $12.50 )
Chipmunk75 posts small blind [$0.10].
gary133 posts big blind [$0.25].
** Dealing down cards **
MrChips__ folds
nutsplayer1 folds
ede3006 folds
johann22111 calls [$0.25]
RecluceTM folds
Chipmunk75 folds
gary133 checks
** Dealing Flop ** [ Ad, Kc, Ah ]
gary133 checks
johann22111 checks
** Dealing Turn ** [ 6c ]
gary133 checks
johann22111 checks
** Dealing River ** [ 7d ]
gary133 checks
johann22111 bets [$0.50]
emday111 has joined the table.
>You have options at Table 126408 Table!.
gary133 calls [$0.50]
johann22111 shows [ 7s, Qs ]two pairs, Aces and Sevens.
gary133 doesn't show [ 4c, Ts ]a pair of Aces.
johann22111 wins $1.55 from the main pot with two pairs, Aces and Sevens.

Ich kenne mich mit handle, FindWindow und ReadProcessMemory nicht genug aus, kann jemand helfen oder Tipps geben??

Schanke dön!!
  Mit Zitat antworten Zitat