To repeat code help me please...

Just starting out? Need help? Post your questions and find answers here.
BackupUser
PureBasic Guru
PureBasic Guru
Posts: 16777133
Joined: Tue Apr 22, 2003 7:42 pm

Post by BackupUser »

Restored from previous forum. Originally posted by Julien Morel.

HI,

I want to write code to recall it later in my program.
For example, I want to post several limps of dialogue to the continuation.

How to make to afterwards avoid writing again the code (No goto and No gosub)

Ex :


MessageRequester("Title", "Message1 PB_MessageRequester_Ok)
MessageRequester("Title", "Message2 PB_MessageRequester_Ok)
MessageRequester("Title", "Message3 PB_MessageRequester_Ok)
MessageRequester("Title", "Message4 PB_MessageRequester_Ok)
MessageRequester("Title", "Message5 PB_MessageRequester_Ok)

….
The remainder of my program to carry out
….

Here Dialogue Box
BackupUser
PureBasic Guru
PureBasic Guru
Posts: 16777133
Joined: Tue Apr 22, 2003 7:42 pm

Post by BackupUser »

Restored from previous forum. Originally posted by DemonHell.


Julien, put all the code you want to repeat in a procedure. If you`re not sure about procedures, look in the PB manual.

Put this bit at the top of your code.

Procedure mydialog()
MessageRequester("Title", "Message1", #PB_MessageRequester_Ok)
MessageRequester("Title", "Message2", #PB_MessageRequester_Ok)
MessageRequester("Title", "Message3", #PB_MessageRequester_Ok)
MessageRequester("Title", "Message4", #PB_MessageRequester_Ok)
MessageRequester("Title", "Message5", #PB_MessageRequester_Ok)
endprocedure


then whenever you want to use this,just use the command
mydialog() in your code.
BackupUser
PureBasic Guru
PureBasic Guru
Posts: 16777133
Joined: Tue Apr 22, 2003 7:42 pm

Post by BackupUser »

Restored from previous forum. Originally posted by Julien Morel.

Thank :)
Post Reply