How do I text wrap the message Dialog box? 3

[Jayz]

Is there a way to text wrap the message that is in a messageDlg box?. Much more pleasing to the eye than having this one one long box.

The only other option I can think of is to open my message in another form.

 

[michaenh]

hi

MessageDlg('text..bla.. bla.. bla.. + #13#10 + #13#10 +
'more text... ' + #13#10 +
'more text... ', mtError, [mbYes, mbNo], 0)

//#13#10 := line break;

Hope this help.

cheers, m

 

[Stretchwickster]

Try this line:

  MessageDlg('Hi this is my very long line.' + #13#10 + 'And this is a new line', mtInformation, [mbOK], 0);

or

  MessageDlg('Hi this is my very long line.'#13#10'And this is a new line', mtInformation, [mbOK], 0);

Either line works but the former may be more readable!
The #13#10 does a carriage-return–line-feed Clive

http://www.kucu.co.uk

Ex nihilo, nihil fit (Out of nothing, nothing comes)

 

[Jayz]

Thankyou both for your great tips.

 

[Kistal]

Or for a wrap that works regardless of which text you put in (especially when handling user input of varying length), you could use an own derivate of TCustomDialog (I think that's the appropriate base class but I'm not sure).

Give it a nice big TLabel and set it's Wrap property on, have the FormCreate resize the label as appropriate, give it a method to change the label's caption and you're set - Just create an object of your new class, set it's label and size in code, and call it with ShowModal.

For just one message of which you know the contents beforehand, this is of course a lot of unnecessary work... In such a context, just using line breaks is a lot simpler and more efficient. But eventually you're going to need this sort of custom dialog quite a few times throughout your various applications. The good news is that, if written right, you only have to write it once and can then use it in all your new applications.

 

[Stretchwickster]

Nice idea Kistal - good lateral thinking - have a star from me! Clive

http://www.kucu.co.uk

Ex nihilo, nihil fit (Out of nothing, nothing comes)

 

[Kistal]

Hehe, it's actually laziness on my behalf...

I've come from Java, but I had to write 6 weeks in Delphi for a specific project. Rather than spending all my time trying to get to know all the existing components and picking appropriate ones, I went the java way and wrote almost anything I needed that seemed even slightly exotic myself

Seeing as Delphi ships with a huge amount of mostly redundant components, I wouldn't even be surprised if there was one among the many that did exactly what I just described, lol... But I didn't want to browse through them all looking for it.