| Autor |
Beitrag |
MKSlayer
Beiträge: 62
SUse / WinXp / Win 2003 server
Turbo Delphi / Borland Builder 4
|
Verfasst: Mi 25.06.08 08:25
Also entweder bin ich zu blöt oder dat geht bei mir nicht könnt ihr mir helfen?
ip:=inhalt.SubString(9); // so ist ja sicherlich falsch
|
|
mkinzler
Beiträge: 4106
Erhaltene Danke: 13
Delphi 2010 Pro; Delphi.Prism 2011 pro
|
Verfasst: Mi 25.06.08 08:27
Schau dir mal Copy() an
_________________ Markus Kinzler.
|
|
MKSlayer 
Beiträge: 62
SUse / WinXp / Win 2003 server
Turbo Delphi / Borland Builder 4
|
Verfasst: Mi 25.06.08 08:31
wo soll ich mir das denn anschauen,.. hab keine hilfe von Borland mit instaliert
|
|
GericasS
Beiträge: 540
Windows Vista Home Premium
D2010, VisualStudio2008
|
Verfasst: Mi 25.06.08 08:33
 MKSlayer hat folgendes geschrieben: | | wo soll ich mir das denn anschauen,.. hab keine hilfe von Borland mit instaliert |
Installier sie nach oder schau doch mal bei google vorbei !
Hat ganze 0,19sek gedauert www.delphibasics.co.uk/RTL.asp?Name=Copy_________________ Alexander N.
Neue Bewaffnung Amilo xi2428 T9300
|
|
MKSlayer
Beiträge: 62
SUse / WinXp / Win 2003 server
Turbo Delphi / Borland Builder 4
|
Verfasst: Mi 25.06.08 08:38
danke dir für die hilfe,...
instalieren geht nicht keine admin rechte hier auf dem rechner
|
|
GericasS
Beiträge: 540
Windows Vista Home Premium
D2010, VisualStudio2008
|
Verfasst: Mi 25.06.08 08:42
| MKSlayer hat folgendes geschrieben: | danke dir für die hilfe,...
instalieren geht nicht keine admin rechte hier auf dem rechner |
Achso okay, dann ist diese Seite sehr zu empfehlen www.delphibasics.co.uk_________________ Alexander N.
Neue Bewaffnung Amilo xi2428 T9300
|
|
MKSlayer
Beiträge: 62
SUse / WinXp / Win 2003 server
Turbo Delphi / Borland Builder 4
|
Verfasst: Mi 25.06.08 08:54
so ich habe das jetzt mal ausprobiert aber das prog stürz mir immer ab wegen einer zugrifsverletzung in adresse 00000000
hier mal der code
  Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
| procedure TForm1.EkImgBtn5Click(Sender: TObject);
var
verg,I : Integer;
inhalt,ip,port,user,pass,Database,tabel,save : String;
begin
conf.LoadFromFile('conf.cfg');
for I := 0 to conf.Count - 1 do begin
inhalt:=conf.Strings[I];
if AnsiPos('ip', inhalt) = 0 then begin
ip:= Copy(inhalt, 4);
Edit1.Text:=ip;
end;
if AnsiPos('port', inhalt) = 0 then begin
port:= Copy(inhalt, 6);
Edit1.Text:=port;
end;
end;
end; |
Zuletzt bearbeitet von MKSlayer am Mi 25.06.08 09:19, insgesamt 2-mal bearbeitet
|
|
oldmax
Beiträge: 380
D3 Prof, D4 Prof
|
Verfasst: Mi 25.06.08 09:12
Hi
Du erwartest doch nicht etwa, das wir dieses lesen...
Wie wär es mal mit Delphi-Tags und Einrücken ?
Das man das auch immer wieder sagen muß.. das sind Grundlagen !
Gruß oldmax
_________________ Zier dich nich so, ich krieg dich schon....
|
|
MKSlayer
Beiträge: 62
SUse / WinXp / Win 2003 server
Turbo Delphi / Borland Builder 4
|
Verfasst: Mi 25.06.08 09:19
so ich habs geändern,. sorry,.. hatte ich in der hecktik vergessen
|
|
ZeitGeist87
Beiträge: 1593
Erhaltene Danke: 20
Win95-Win10
Delphi 10 Seattle, Rad Studio 2007, Delphi 7 Prof., C++, WSH, Turbo Pascal, PHP, Delphi X2
|
Verfasst: Mi 25.06.08 09:31
[Glaskugelmodus]
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:
| procedure TForm1.EkImgBtn5Click(Sender: TObject);
var verg,I : Integer;
inhalt,ip,port,user,pass,Database,tabel,save : String;
begin
conf:= TStringList.create;
conf.LoadFromFile('conf.cfg');
for I := 0 to conf.Count - 1 do
begin
inhalt:=conf.Strings[I];
if AnsiPos('ip', inhalt) = 0 then
begin
ip:= Copy(inhalt, 4);
Edit1.Text:=ip;
end;
if AnsiPos('port', inhalt) = 0 then
begin
port:= Copy(inhalt, 6);
Edit1.Text:=port;
end;
end;
Conf.Free;
end; | [/Glaskugelmodus] _________________ Wer Provokationen, Ironie, Sarkasmus oder Zynismus herauslesen kann soll sie ignorieren um den Inhalt meiner Beiträge ungetrübt erfassen zu können.
|
|
