HELP :D - Programmers Heaven

Howdy, Stranger!

It looks like you're new here. If you want to get involved, click one of these buttons!

Categories

HELP :D

[b][red]This message was edited by lolmx at 2005-9-7 9:32:14[/red][/b][hr]
Hi im trying to make a progy that will save some string text into a text file.{ the file looks like this :

name , surname ,addres ,e-mail ,phone

}

,but im having a problem when reading the line(/s). i used this :

var f:textFILE;
var s:string;

begin ..
Assignfile(f,'f:TEXT.XXX');
reset(f);

ReadLN(f,s);

editbox1.text:=s;
editbox2.text:=s;
editbox3.text:=s;
editbox4.text:=s;
editbox5.text:=s;

the problem is that the boxes showing this :
name , surname ,addres ,e-mail ,phone

and i want this :

editbox1.text :='name';
editbox2.text:='surname';
editbox3.text:='addres';
editbox4.text:='e-mail';
editbox5.text:='phone';

is it possible ?

ps) i dont want to use ini file.


thanks for reading my post :)






Comments

  • zibadianzibadian Posts: 6,349Member
    : [b][red]This message was edited by lolmx at 2005-9-7 9:32:14[/red][/b][hr]
    : Hi im trying to make a progy that will save some string text into a text file.{ the file looks like this :
    :
    : name , surname ,addres ,e-mail ,phone
    :
    : }
    :
    : ,but im having a problem when reading the line(/s). i used this :
    :
    : var f:textFILE;
    : var s:string;
    :
    : begin ..
    : Assignfile(f,'f:TEXT.XXX');
    : reset(f);
    :
    : ReadLN(f,s);
    :
    : editbox1.text:=s;
    : editbox2.text:=s;
    : editbox3.text:=s;
    : editbox4.text:=s;
    : editbox5.text:=s;
    :
    : the problem is that the boxes showing this :
    : name , surname ,addres ,e-mail ,phone
    :
    : and i want this :
    :
    : editbox1.text :='name';
    : editbox2.text:='surname';
    : editbox3.text:='addres';
    : editbox4.text:='e-mail';
    : editbox5.text:='phone';
    :
    : is it possible ?
    :
    : ps) i dont want to use ini file.
    :
    :
    : thanks for reading my post :)
    :
    :
    :
    :
    Here is a function to extract part from a string, based on a single-char delimiter. This function can be used to solve your problem.

    http://www.codepedia.com/1/StringSplit

  • lolmxlolmx Posts: 6Member
    : : [b][red]This message was edited by lolmx at 2005-9-7 9:32:14[/red][/b][hr]
    : : Hi im trying to make a progy that will save some string text into a text file.{ the file looks like this :
    : :
    : : name , surname ,addres ,e-mail ,phone
    : :
    : : }
    : :
    : : ,but im having a problem when reading the line(/s). i used this :
    : :
    : : var f:textFILE;
    : : var s:string;
    : :
    : : begin ..
    : : Assignfile(f,'f:TEXT.XXX');
    : : reset(f);
    : :
    : : ReadLN(f,s);
    : :
    : : editbox1.text:=s;
    : : editbox2.text:=s;
    : : editbox3.text:=s;
    : : editbox4.text:=s;
    : : editbox5.text:=s;
    : :
    : : the problem is that the boxes showing this :
    : : name , surname ,addres ,e-mail ,phone
    : :
    : : and i want this :
    : :
    : : editbox1.text :='name';
    : : editbox2.text:='surname';
    : : editbox3.text:='addres';
    : : editbox4.text:='e-mail';
    : : editbox5.text:='phone';
    : :
    : : is it possible ?
    : :
    : : ps) i dont want to use ini file.
    : :
    : :
    : : thanks for reading my post :)
    : :
    : :
    : :
    : :
    : Here is a function to extract part from a string, based on a single-char delimiter. This function can be used to solve your problem.
    :
    : http://www.codepedia.com/1/StringSplit
    :
    :

    Thanks for replying :) ,but can i make one more question ?
    can you make a simple example on how to call the function ?
    --i'm niewbie --

  • zibadianzibadian Posts: 6,349Member
    : : : [b][red]This message was edited by lolmx at 2005-9-7 9:32:14[/red][/b][hr]
    : : : Hi im trying to make a progy that will save some string text into a text file.{ the file looks like this :
    : : :
    : : : name , surname ,addres ,e-mail ,phone
    : : :
    : : : }
    : : :
    : : : ,but im having a problem when reading the line(/s). i used this :
    : : :
    : : : var f:textFILE;
    : : : var s:string;
    : : :
    : : : begin ..
    : : : Assignfile(f,'f:TEXT.XXX');
    : : : reset(f);
    : : :
    : : : ReadLN(f,s);
    : : :
    : : : editbox1.text:=s;
    : : : editbox2.text:=s;
    : : : editbox3.text:=s;
    : : : editbox4.text:=s;
    : : : editbox5.text:=s;
    : : :
    : : : the problem is that the boxes showing this :
    : : : name , surname ,addres ,e-mail ,phone
    : : :
    : : : and i want this :
    : : :
    : : : editbox1.text :='name';
    : : : editbox2.text:='surname';
    : : : editbox3.text:='addres';
    : : : editbox4.text:='e-mail';
    : : : editbox5.text:='phone';
    : : :
    : : : is it possible ?
    : : :
    : : : ps) i dont want to use ini file.
    : : :
    : : :
    : : : thanks for reading my post :)
    : : :
    : : :
    : : :
    : : :
    : : Here is a function to extract part from a string, based on a single-char delimiter. This function can be used to solve your problem.
    : :
    : : http://www.codepedia.com/1/StringSplit
    : :
    : :
    :
    : Thanks for replying :) ,but can i make one more question ?
    : can you make a simple example on how to call the function ?
    : --i'm niewbie --
    :
    :
    You call this function like you call any other function/procedure:
    [code]
    editbox1.text := StringSplit(s, 0, ',');
    [/code]
  • lolmxlolmx Posts: 6Member
    : : : : [b][red]This message was edited by lolmx at 2005-9-7 9:32:14[/red][/b][hr]
    : : : : Hi im trying to make a progy that will save some string text into a text file.{ the file looks like this :
    : : : :
    : : : : name , surname ,addres ,e-mail ,phone
    : : : :
    : : : : }
    : : : :
    : : : : ,but im having a problem when reading the line(/s). i used this :
    : : : :
    : : : : var f:textFILE;
    : : : : var s:string;
    : : : :
    : : : : begin ..
    : : : : Assignfile(f,'f:TEXT.XXX');
    : : : : reset(f);
    : : : :
    : : : : ReadLN(f,s);
    : : : :
    : : : : editbox1.text:=s;
    : : : : editbox2.text:=s;
    : : : : editbox3.text:=s;
    : : : : editbox4.text:=s;
    : : : : editbox5.text:=s;
    : : : :
    : : : : the problem is that the boxes showing this :
    : : : : name , surname ,addres ,e-mail ,phone
    : : : :
    : : : : and i want this :
    : : : :
    : : : : editbox1.text :='name';
    : : : : editbox2.text:='surname';
    : : : : editbox3.text:='addres';
    : : : : editbox4.text:='e-mail';
    : : : : editbox5.text:='phone';
    : : : :
    : : : : is it possible ?
    : : : :
    : : : : ps) i dont want to use ini file.
    : : : :
    : : : :
    : : : : thanks for reading my post :)
    : : : :
    : : : :
    : : : :
    : : : :
    : : : Here is a function to extract part from a string, based on a single-char delimiter. This function can be used to solve your problem.
    : : :
    : : : http://www.codepedia.com/1/StringSplit
    : : :
    : : :
    : :
    : : Thanks for replying :) ,but can i make one more question ?
    : : can you make a simple example on how to call the function ?
    : : --i'm niewbie --
    : :
    : :
    : You call this function like you call any other function/procedure:
    : [code]
    : editbox1.text := StringSplit(s, 0, ',');
    : [/code]
    :
    thanks ;)
Sign In or Register to comment.