Entwickler-Ecke

Internet / Netzwerk - Mehrere Records mit Indy10 idTCP versenden - Problem


bbBowser - Di 21.10.08 23:35
Titel: Mehrere Records mit Indy10 idTCP versenden - Problem
hey leute;)
ich hab mein problem schon in einem andren forum geposted aber bisher keine antwort erhalten, dehsalb dachte ich, ich versuch mal bei euch mein glück:P

mein client soll ein record auf buttonclick zum server zu senden. nach einigem rumprobieren(bin relativ unerfahren mit indy 10) hat das auch ganz super geklappt. wenn ich nun allerdings den button erneut betätige um ein verändertes record wieder zum server zu senden, dann zeigt der mir das erste record weiterhin unverändert an.
ich hoffe ihr versteht und jemand kann mir helfen
hier noch etwas relevanter code:
server:

Delphi-Quelltext
1:
2:
3:
4:
5:
6:
procedure TForm1.IdTCPServer1Execute(AContext: TIdContext);
var
begin
  AContext.Connection.IOHandler.ReadBytes(Buf, Sizeof(TClientFiles));
  BytesToRaw(Buf, ClientFiles, Sizeof(TClientFiles));
end;


client:

Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
procedure TForm1.CreateFileRecord(requestedDir: string);
var
  i:integer;
begin
  i:=1;
  SetCurrentDir(requestedDir);
  if FindFirst('*.*', faAnyFile, searchResult) = 0 then
  begin
    repeat
      ClientFiles.name[i] := searchResult.name;
      ClientFiles.size[i] := searchResult.size;
      ClientFiles.attr[i] := searchResult.attr;
      i:=i+1;
    until FindNext(searchResult) <> 0;
    FindClose(searchResult);
    while i < 200 do
    begin
      ClientFiles.name[i] := '-';
      ClientFiles.size[i] := 0;
      ClientFiles.attr[i] := 0;
      i:=i+1;
    end;

  end;
  buf := RawToBytes(ClientFiles, SizeOf(TClientFiles));
  IdTCPClient1.IOHandler.Write(buf);
end;


danke für eure (hoffentlich) hilfe:P

bbBowser


Xentar - Mi 22.10.08 00:16

1. Streckst du jedem die Zunge raus, den du um Hilfe fragst?
2. Hast du dir mal im Debugger angesehen, ob die Werte auch tatsächlich geändert werden? Hast du dir auch mal angesehen, was in buf drinsteht?


bbBowser - Mi 22.10.08 00:26

nein hab ich bisher nochnicht, wie mach ich das am besten? ist der umgewandelte record überhaupt noch lesbar? ich kann mir nämlich unter bytevariablen nich wirklich was vorstellen^^
aber das werd ich morgen gleich ausprobieren, auch wenn ich relativ stark davon ausgehe, dass an dem punkt noch alles richtig läuft und erst beim server was schiefgeht.

danke :D
bbBowser