Forum: Netzwerke
Delphi
by Sheak,
5. Jan 2008
Jo ist bisle unübersichtlich, ich weiß. ^^
Hab den Fehler gefunden. Bei der ClientRead-Methode fehlte mir vor dem ReceiveBuf(Rec,SizeOf(Rec)); das Socket.
/Close Plz :)
Forum: Netzwerke
Delphi
by Sheak,
5. Jan 2008
procedure TBrett.ZeichenFlaecheMouseMove(Sender: TObject;
Shift: TShiftState; X, Y: Integer);
begin
If RbNormal.Checked=True
Then Modus:=1 else
If RbWürfel.Checked=True
Then Modus:=2 else
If RbKreis.Checked=True
Then Modus:=3 else
Zeichenmodus:=1;
Forum: Netzwerke
Delphi
by Sheak,
5. Jan 2008
type
CustomRec = record
Code:Array of Integer;
end;
var
Brett: TBrett;
PosX,PosY,PosXX,PosYY,PosXXX,PosYYY,Modus:Integer;
Rec: CustomRec;
Forum: Netzwerke
Delphi
by Sheak,
5. Jan 2008
Erstmal danke für die Hilfe! :)
Bin nun in der Lage den Array zu versenden, allerdings stehe ich nun vor einem neuen Problem: Der Array bekommt die ersten Werte zudefiniert und verschickt diese, alles wunderbar. Aber nach dem ersten Senden werden die Werte nicht überschrieben, sondern die alten Werte bleiben erhalten (sry für meien Dummheit :mrgreen: ). Wie kann ich die Array-Werte (nicht...
Forum: Netzwerke
Delphi
by Sheak,
2. Jan 2008
Nabend und frohes neues liebe Delphi-Praxis-Community und -Admins,
im Zuge einer Facharbeit an unserer Schule schreibe ich an einem kleinen Programm mit Delphi, welches ich dann für die Facharbeit analysiere und den Weg zum Endprodukt hin beschreibe.
Mein Ziel ist, dass ich Daten erzeuge, welche ich an meinen gegenüber im Netzwerk schicke, welcher sie dann (mittels des Programms)...