Thema: Delphi Problem mit Edit Feldern

Einzelnen Beitrag anzeigen

Medium

Registriert seit: 23. Jan 2008
3.679 Beiträge
 
Delphi 2007 Enterprise
 
#2

Re: Problem mit Edit Feldern

  Alt 21. Jun 2008, 00:14
Mal Pseudocode als Anreiz. Ist recht simpel, du hast dich vermutlich nur in zu verworrene Gedanken vergalloppiert
Code:
string = ''
WENN Edit1 nicht leer DANN
    string = string + Edit1

WENN Edit2 nicht leer DANN
    WENN string nicht leer DANN
        string = string + '|'
    string = string + Edit2

WENN Edit3 nicht leer DANN
    WENN string nicht leer DANN
        string = string + '|'
    string = string + Edit3

Memo.Text = string
"When one person suffers from a delusion, it is called insanity. When a million people suffer from a delusion, it is called religion." (Richard Dawkins)
  Mit Zitat antworten Zitat