Just nu i M3-nätverket
Jump to content

En del av...


Mikey

Recommended Posts

Hur ska man göra för att kunna öppna en TXT-fil till en memoruta och bara visa en viss del av filen.

 

Exempel:

 

Detta är textfilen och detta kommer inte att visas.

//10//

Här är det som kommer att visas i memorutan i delphi programmet

//10//

Här är slutet och det kommer inte att visas.

 

 

Kan man göra någonting i denna stil?

 

/mikey

Link to comment
Share on other sites

Om du vet precis vad din textfil innehåller, och om den inte förändras, så är en enkel men klumpig variant att:

Lägg till ytterligare en Memo där visble=False.

Läs in filen i den nya Memon.

Memo1.Clear;

For i:=3 to 5 do Memo1.Lines.Add(Memo2.Lines);

 

Alternativt i Memo2 sök upp aktuell text och sätt Selstart och SelLength för att sedan:

Memo1.text:=Memo2.Seltext;

 

Jag vet att detta är klumpigt, men gör det enkelt för dig.

Link to comment
Share on other sites

Ett litet exempel som borde funka bra.

 

var

StrList: TStringList;

Start, Slut, i: integer;

begin

StrList := TStringList.Create;

 

//Läser in filen till Strlist

StrList.LoadFromFile('c:\test.txt');

 

//Letar upp var vi ska börja läsa

Start := StrList.IndexOf('//start10//');

 

//Letar upp var vi ska sluta läsa

Slut := StrList.IndexOf('//slut10//');

 

//Läser in raderana till memo1

for i := start+1 to slut-1 do

memo1.Lines.add(StrList);

 

//frigör Stringlisten som skapades i början

StrList.Free;

end;

 

Ändrade lite i filen, exemplet funkar med följande text.

 

"Detta är textfilen och detta kommer inte att visas.

//start10//

Här är det som kommer att visas i memorutan i delphi programmet

//slut10//

Här är slutet och det kommer inte att visas."

Link to comment
Share on other sites

Archived

This topic is now archived and is closed to further replies.



×
×
  • Create New...