Åbne tekstfil

Tags:    delphi

User
Bruger #763 @ 20.03.02 10:38
Hejsa

Kan en eller anden give mig en kodestump så jeg kan åbne en tekstfil og smide første linie i én editboks og resten i en anden?

God forklaring = flere UP's. 50 UP er udlovet for det bedste svar.



2 svar postet i denne tråd vises herunder
1 indlæg har modtaget i alt 3 karma
Sorter efter stemmer Sorter efter dato
Åbne filen til Memo1 :<pre>Memo1.Lines.LoadFromFile('C:\\text.txt');</pre>

Eller du kan lave en OpenDialog, ved at smide yderligere et TOpenDialog komponent ind på formen og gøre sådan :<pre>with OpenDialog do
if Execute then begin
Memo1.Lines.LoadFromFile(filename); // Filnavnet i OpenDialog1!!
end;</pre>At smide Memo'ens indhold over i Editboxes :<pre>Edit1.Text := Memo1.Lines[0]
Edit2.Text := Memo1.Lines[1];</pre>osv. Håber det kan bruges.

¤¤¤ Mark H. Jensen ¤¤¤



User
Bruger #24 @ 20.03.02 12:31
hovsa.. never mind :) - [Redigeret d. 20/03-02 12:37:05 af Daniel Lauritzen]



t