Ini Problem, wo liegt der Fehler?

[bigben37]

@DeddyH

ok, das wusste ich nicht

@Die Muhkuh

[OT]Biberach(Baden)[/OT]

[Die Muhkuh]

Zitat:

Zitat von bigben37

[OT]Biberach(Baden)[/OT]

[OT] Ein Fast-Nachbar :mrgreen: *Vom "Berg" runterwink :hi: *[/OT]

[SirThornberry]

Hallo FileOwner, gib deinem Beitrag bitte einen aussagekräftigen Titel :) Das hat den Vorteil das alle sofort wissen worum es hier geht und somit die Leute die Ahnung vom Thema haben es auch anschauen. Zudem hat es den Vorteil das andere mit dem gleichen Problem später über die Suchfunktion auch schneller dieses Thema hier finden und somit auch die Lösung.

Zum ändern des Titels nutze einfach http://www.delphipraxis.net/template.../icon_edit.gif über dem ersten Beitrag von dir

[DeddyH]

Außerdem wäre es sinnvoll, den "Fehler" mal zu beschreiben (meckert der Compiler, macht das Prog nicht, was es soll...) :zwinker:

[Die Muhkuh]

Zitat:

Zitat von DeddyH

(meckert der Compiler, macht das Prog nicht, was es soll...) :zwinker:

Fehlerbeschreibung: Das Prog macht nicht, was es soll :mrgreen:

*SCNR*

[DP-Maintenance]

Dieses Thema wurde von "SirThornberry" von "Sonstige Fragen zu Delphi" nach "VCL / WinForms / Controls" verschoben.

[FileOwner]

Lag wohl scheinbar wirklich am Pfad, das ganze sieht jetzt so aus:

Delphi-Quellcode:

procedure TForm2.FormClose(Sender: TObject; var Action: TCloseAction);
var ini: TIniFile;
begin
 ini:=TIniFile.create(ExtractFilePath(ParamStr(0))+
    'c:\server.ini');

    ini.WriteString('Connection','ServerIP',Form2.ClientSocket1.Host);
    ini.WriteString('Connection','Port',inttostr(Form2.ClientSocket1.Port));
    ini.WriteString('User','Nickname',Nickname);
    ini.Free;
end;

procedure TForm2.FormShow(Sender: TObject);
var ini: TIniFile;
begin
  ini:=TIniFile.Create('c:\server.ini');
  try
  clientsocket1.Host:=ini.Readstring('Connection','ServerIP', '');
  Nickname:=ini.Readstring('User','Nickname', '');
  clientsocket1.Port:=ini.ReadInteger('Connection','Port',0);
  finally
    ini.free;
    Timer4.Enabled := true; end
end;

Nur jetzt taucht das Problem auf das die server.ini nicht gespeichert wird :(

Danke @ alle und das ihr auch Neulingen helft ;)

[Matze]

Hallo

Delphi-Quellcode:

ini:=TIniFile.create(ExtractFilePath(ParamStr(0))+
    'c:\server.ini');

Das ergibt dann ein Pfad wie C:\Programme\Projekt\c:\server.ini.
Das ist nicht das, was du willst. ;)

[Klaus01]

eventuell so:

Delphi-Quellcode:

ini:=TIniFile.create('c:\server.ini');

obwohl Du Dir da im klaren sein solltest, dass nicht unter jedem OS
etwas auf c:\ gespeichert werden kann.

Grüße
Klaus

[mkinzler]

Delphi-Quellcode:

ini:=TIniFile.create(ExtractFilePath(ParamStr(0))+'server.ini');