Howdy, Stranger!

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

Categories

Welcome to the new platform of Programmer's Heaven! We apologize for the inconvenience caused, if you visited us from a broken link of the previous version. The main reason to move to a new platform is to provide more effective and collaborative experience to you all. Please feel free to experience the new platform and use its exciting features. Contact us for any issue that you need to get clarified. We are more than happy to help you.

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.