Textdateien durchsuchen und db erstellen!Delph,VB5

Computer: Software & Programmierung Programmierung allgemein
1

Hallo,

habe schon einmal das problem geschildert und R.K hat geantwortet. Das einlesen einer Textdatei funkt, ich habe leider noch nicht mit len, lenght o.ä. befehl gearbeitet, deshalb fällt es mir schwer bestimmte textteile herraus zu schneiden. könnte mir jemand helfen?
Bsp.: ich habe eine textdatei „test.txt“ in der 2. zeile des „test.txt“ befindet sich folgender wortlaut:„rechnername //pc1“
ich lese die textdatei mit einem RTF.control ein und finde mit dem „find“-Befehl(VB5) den wortlaut „rechnername“. dieser wortlaut wird immer gleich sein, der der mich interessiert ist der //pc1 (oder nur pc1), diesen will ich in eine DB setzen. War das verständlich? wer kann mir da helfen?

2

quick and dirty:

function GetStr(S:String):String;
var n: Integer;
begin
n:=Pos(’//’,S)+2;
Result:=Copy(S,n,length(S)-n+1);
end;

3

ich lese die textdatei mit einem
RTF.control ein und finde mit dem
„find“-Befehl(VB5) den wortlaut
„rechnername“. dieser wortlaut wird immer
gleich sein, der der mich interessiert
ist der //pc1 (oder nur pc1), diesen will
ich in eine DB setzen. War das
verständlich? wer kann mir da helfen?

Ja, was denn nun - Delphi oder VB???

(Bei VB heißt das Pendant zu „Pos“ „Instr“, und das zu „Copy“ „Mid“…)

Reinhard