? Digao Dalpiaz Nachrichten über Telegramm



25.03.2024 (Version 6.7) ( minimaler dzhtmlText Version: 6.3 )
16.03.2024 (Version 6.6)
03/10/2024 (Version 6.5)
23.02.2024 (Version 6.4)
22.02.2024 (Version 6.3)
20.02.2024 (Version 6.2)
Lib{Platform}{Config} . Bitte überprüfen Sie Ihre Bibliothekswege.21.01.2024 (Version 6.1) ( minimaler dzhtmlText Version: 5.2 )
01/12/2024 (Version 6.0) ( minimaler dzhtmlText Version: 5.1 )
WARNUNG!!! Bitte deinstallieren Sie die vorherige Version vollständig, indem Sie den vorherigen DAM -Komponentenordner löschen, da viele Dateien ihre Namen und Positionen geändert haben.
12.12.2023 (Version 5.2)
29.07.2023 (Version 5.1)
04/11/2023 (Version 5.0) ( minimales dzhtmlText Version: 4.0 )
DamUnitName -Eigentum unterstützt wird09/12/2021 (Version 4.16)
24.07.2021 (Version 4.15)
13.06.2021 (Version 4.14)
21.03.2021 (Version 4.13)
14.03.2021 (Version 4.12)
13.03.2021 (Version 4.11)
03/05/2021 (Version 4.10)
02/10/2021 (Version 4.9)
18.12.2020 (Version 4.8)
27.11.2020 (Version 4.7)
11/11/2020 (Version 4.6)
03.10.2020 (Version 4.5)
27.10.2020 (Version 4.4)
26.02.2020 (Version 4.3) ( minimaler dzhtmlText Version: 2.6 )
26.10.2020 (Version 4.2)
18.10.2020 (Version 4.1) ( minimaler dzhtmlText Version: 2.04 )
14.10.2020 (Version 4.0)
Bemerkungen:
24.09.2020
08/11/2020
08/07/2020
08/03/2020
30.07.2020
21.07.2020
25.05.2020
<img:nnn> ). Es ist erforderlich, die TDZHTMLText -Komponente zu aktualisieren.05/03/2020
05/02/2020
DamParams zum Ausfüllen von Parametern bei der Verwendung von DAM -Nachrichtenmethoden. Dies ist für Delphi -Versionen unter XE8 erforderlich, da kein dynamisches Array als Typunterstützung hatte.System.ImageList von der Damlist-Einheit (Design-Time-Paket), da sie nicht von Delphi-Versionen unter XE8 unterstützt wird.AutoWidth -Eigenschaft in Tdam entfernt. Jetzt gibt es eine neue Eigenschaft FixedWidth in der TDAMMSG -Komponente, sodass Sie eine benutzerdefinierte Breite für die Nachricht angeben können. Die Komponente führt die interne Funktion der automatischen Breite, wenn die Festbreite Null ist (Standardwert).CenterButtons in Standard -False geändert, da neue Windows -Dialoge im Stil rechts ausgerichtet sind.26.04.2020
<imgres:{resource_name}> Tag. Fügen Sie einfach PNG -Image in die Anwendungsressourcen hinzu und verwiesen das Tag, um sie in die Nachricht zu verweisen. Diese Implementierung erfolgt in der DZHTMLText -Komponente, die von DAM verwendet wird. Sie müssen nur Ihre DZHTMLText -Komponente aktualisieren und diese Funktion ist verfügbar. Bitte lesen Sie den Abschnitt DZHTMLText Image Tag, um weitere Informationen zu erhalten. Wichtig: Bilder werden zur Entwurfszeit nicht sichtbar .19.04.2020
10/07/2019
10/06/2019
10/05/2019
05/03/2019
02/11/2019
02/08/2019
02/07/2019
02/06/2019
02/05/2019
Fügen Sie neue Eigenschaften MessageColor und ButtonScolor in der TDAM -Komponente hinzu, um die Anpassung des Meldungsdialogfelds zu ermöglichen.
Fast jede Anwendung, die Sie erstellen, müssen Sie Nachrichtendialoge hinzufügen.
Delphi bietet Ihnen einige Optionen wie ShowMessage, Messagedlg und MessageBox.
Wenn Ihr Projekt größer wird, können die Dialoge Ihren Code, vor allem, wenn Sie viele Zeilen in die Nachrichten schreiben müssen, mit vielen Parametern durcheinander bringen.
Wenn Sie einen Teil der Nachricht formatieren müssen, müssen Sie Etiketten in einer benutzerdefinierten Form hinzufügen. Das könnte wirklich schlecht sein.
Schauen Sie sich diese Nachricht an:
begin
ShowMessage( ' The task was scheduled to run at the time: ' +aTime+ ' . ' +# 13 # 10 +
# 13 # 10 +
' Please, check the schedule at main board. ' +
' If you want to change schedule, find by ID # ' +IntToStr(IDNumber)+ ' . ' +# 13 # 10 +
# 13 # 10 +
' This task was created by user ' +aUserName+ ' . Only this user can edit this task profile. ' );
end ;Ich finde das wirklich hässlich, findest du nicht? ?
Mit Mutter können Sie diese Nachricht wie diese schreiben :?
begin
InfoTaskScheduled([aTime, IDNumber, aUserName]);
end ;Mit dieser Komponente können Sie alle Ihre Anwendungsnachrichten in einem "Container" verwalten. Sie können den Meldungsdialog mit einem Assistentenersteller erstellen, sodass Sie die Nachricht formatieren können (fett, kursiv, unterstreichend, Schriftname, Schriftgröße, Texthintergrundfarbe, Ausrichtung des Zentrums, richtig ausrichten, Registerkartenausrichtung, klickbare Links usw.).
Sie können die Meldungschaltflächen, das Symbol, den Formulentitel und vieles mehr angeben.
Dann geben Sie einen Namen für die Nachricht an. Sie können also die Nachricht in einem Teil Ihrer Anwendung aufrufen und nur die Methode unter dem Nachrichtennamen aufrufen!
Wenn Sie Parameter im Nachrichtentext angeben, können Sie beim Aufrufen der Nachrichtenmethode Parameter angeben, die im Text ersetzt werden.
Bitte lesen Sie diese Dokumentation sorgfältig durch, um zu wissen, wie diese Komponente funktioniert. ?
Der Damm Container listet alle erstellten Nachrichten auf, die bei DFM gespeichert sind:

Der Message Assistent Creator, um den Meldungsdialog anzupassen:

Der Meldungsdialog:?

Die Verknüpfung
CTRL+Cist im Nachrichtenformular verfügbar, um die Nachricht in die Zwischenablage zu kopieren.
Zuerst müssen Sie meine DZHTMLText -Komponente installieren. Holen Sie sich hier: https://github.com/digao-dalpiaz/dzhtmltext
Dies ist ein Etikett mit HTML -Formatierungskomponente. Die Nachrichten verwenden diese Komponente, um formatierten Text anzuzeigen.
Wenn Sie DZHTMLText und DAM sofort installieren, müssen Sie nach der Installation von DZHTMLTEXT den DELPHI -DZHTMLTEXT den DAM öffnen und schließen.
LibWin32Release .Unterstützt Delphi xe3..delphi 12
Gehen Sie zum Menüpaket> Paketdatei (.lpk) und laden Sie Lazdampackage.lpk und klicken Sie in Compile .
Gehen Sie zum Menüpaket> Paketdatei (.lpk) und laden Sie LazdamDesignPackage.lpk und klicken Sie in Verwendung> Installation .
Zu diesem Zeitpunkt stehen die folgenden Sprachen für Nachrichten zur Verfügung:
Die Sprache legt die Bildunterschrift von Schaltflächen in den Meldungsdialogen fest, z. Der Formeltitel kann in den Nachrichteneigenschaften geändert werden und automatisch von anderen Objekten festgelegt werden, z.
Sie können ein Problem öffnen, um mir eine neue Sprachübersetzung oder eine korrekte aktuelle Übersetzung zu senden
Die Hauptidee besteht darin, ein TDAM in die Hauptform oder das Hauptdatenmodul fallen zu lassen. Der TDAM ist ein Container mit allen TDAMMSG (Meldungsdialog).
Um Nachrichten zu verwalten, doppelklicken Sie einfach auf die TDAM-Komponente oder klicken Sie mit der rechten Maustaste und wählen Sie Dammnachrichten verwalten .
Aber wie rufe ich die Nachrichten an?
Das TDAM hat ein Eigentum namens DamUnitName . Hier definieren Sie einen Einheitsnamen, um alle Nachrichtenmethoden zu enthalten. Wenn Sie die Funktion Build -Einheit verwenden, erstellt die Komponente dieses Gerät automatisch im Projektordner mit den in allen erstellten Nachrichten basierenden Methoden (mit demselben Namen wie der Nachrichtenname).
In jedem Gerät fügen Sie diesem Gerät einfach eine Verwendung hinzu und rufen die gewünschte Nachricht mit dem Nachrichtennamen an. Wenn die Nachricht Parameter enthält, wird die Methode automatisch deklariert, um Parameter in einem Array zu fordern.
Ja, aber wenn ich in derselben Klasse bin (tform/tdatamodule), ist das die TDAM- und TDAMMSG -Nachrichten, wenn ich die Methode mit dem Nachrichtennamen aufrufe, denke der Delphi, dass ich das Objekt der Nachricht verweise!
Dies ist wahr, und aus diesem Grund hat die Komponente eine versteckte Funktion. Sie müssen die Nachricht nur mit _ benennen. Der Einheitserbauer entfernt dieses Zeichen, um die Methode zu benennen, und der Delphi wird die beiden Dinge nicht verwirren.
Ich empfehle Ihnen, alle Nachrichten zu erstellen, die mit dem _ -Zeichen bezeichnet werden.
Wenn Sie den Assistenten verwenden, beginnt der Name automatisch mit diesem Charakter.
Der DAM-Manager befindet sich eine Schaltfläche, um alle ausgewählten Nachrichten auszublenden/zu verstecken.
Denken Sie daran, dass Sie jedes Mal, wenn Sie die Nachrichten ändern, das Gerät wieder aufbauen müssen. Klicken Sie einfach auf die Schaltfläche Build -Einheit, um zu aktualisieren.
OK, aber ich möchte dieses Gerät nicht verwenden! Gibt es eine andere Methode?
Ja natürlich. Sie können die Nachricht mit den Funktionen des TDAMMSG -Objekts aufrufen. Verwenden Sie einfach die Funktionen des Nachrichtenobjekts oder RunAsBool Run . In diesem Fall empfehle ich Ihnen, die Nachricht nicht zu verbergen, damit Sie den Objektnamen so anrufen können, wie es ist.
Aber ich empfehle Ihnen ehrlich, das Gerät zu verwenden, da es viel sinnvoller ist.
Kann ich in meiner Anwendung mehr als einen TDAM -Container verwenden?
Ja, du kannst. Mit dem TDAM können Sie einige Konfigurationen definieren, z. B. die Nachrichtenschrift und Sounds. Möglicherweise haben Sie möglicherweise mehr als ein TDAM, um diese Konfigurationsgruppe zu haben. Außerdem können Sie verschiedene TDAM verwenden, um Nachrichten nach Kategorie zu gruppieren. Sie können TDAM auch in bestimmte Formen einfügen, aber denken Sie daran, dass der Container natürlich existieren muss, um die Nachrichten zu entlassen.
Wenn Sie mehr als ein TDAM verwenden, empfehle ich Ihnen, denselben DamUnitName in allen TDAM -Komponenten festzulegen. Wenn Sie also die Build -Taste für die Build -Einheit aufrufen, wird ein einzelnes Gerät mit allen Nachrichten aller TDAM -Container generiert. So können Sie diese einzelne Einheit in allen anderen Einheiten Ihres Projekts verwenden, um eine Nachricht aufzurufen.
Nachrichtenergebniscodes:
Wenn Sie Nachricht nach Methode des Nachrichtennamens aufrufen, ist die Methode eine Prozedur, wenn die Nachricht nur eine Schaltfläche enthält.
Wenn die Nachricht zwei oder drei Schaltflächen enthält, ist die Methode eine Funktion. Wenn es zwei Schaltflächen gibt, gibt die Funktion immer den booleschen Wert zurück, der true zurückgegeben wird, wenn die erste Schaltfläche links geklickt wurde, oder die falsche Rückgabe, wenn die zweite Schaltfläche (letztes Schaltfläche rechts) geklickt wurde.
Wenn die Meldung drei Taste hat, gibt die Funktion den Ganzzahlwert 1, 2 oder 3 zurück, je nachdem, welche Taste im Meldungsdialog gedrückt wurde. Der erste Knopf ist der linke; Der zweite ist der mittlere Knopf; Die dritte Taste ist die rechte Taste.
Wenn Sie also drei Schaltflächen verwenden, können Sie also eine Variable oder sogar einen case verwenden:
case QuestionSaveFile([aFileName]) of
1 : DoSaveFile; // Yes button
2 : { continue } ; // No button
3 : Abort; // Cancel button
end ; Wenn Sie in der Nachricht austauschbare Parameter verwenden möchten, geben Sie einfach %p ein. Sie können mehrere Parameter in derselben Nachricht angeben. Wenn Sie eine Nachricht aufrufen, befinden sich das Parameter -Array nacheinander in derselben Reihenfolge, die sie in der Nachricht getippt werden.
Das Parameter -Array ist ein Variantenart, sodass sie keine Konvertierungen benötigen.
Beispiel:
// TDamMsg Message property = 'This is a %p message number %p at time %p'
MyCustomMessage([ ' test ' , 123 , Now]);
// or
MsgInfo( ' This is a %p message number %p at time %p ' , [ ' test ' , 123 , Now]); ButtonsColor: TColor = Definieren Sie die Hintergrundfarbe der Schaltflächenbereiche im Meldungsdialog.
ButtonsFont: TFont = definiert die Textschrift der Dialogschaltflächen
ButtonsFontColor: TAlphaColor = Definiert die Textschriftfarbe der Dialogschaltflächen (nur in der FMX -Umgebung verfügbar)
CenterButtons: Boolean = Definieren Sie, ob die Schaltflächen im Nachrichtenformular in der Mitte ausgerichtet sind. Wenn diese Eigenschaft falsch ist, werden die Schaltflächen rechts von Formular ausgerichtet.
DamDefault: Boolean = definiert, ob dieses TDAM zum Abfassen von Schnellnachrichten verwendet wird (bitte lesen Sie Schnellnachrichten). Sie können nur eine als Standardeinstellung in der Anwendung definiert lassen.
DamUnitName: String = Geben Sie den Einheitsnamen an, der mit allen Nachrichtenmethoden im Projektordner erstellt werden soll. Geben Sie keine Dateierweiterung an, da die Komponente den Namen automatisch mit ".pas" -Weiterung abschließt.
DialogBorder: Boolean = definiert, ob das Dialogfeld "Fenster des Nachrichten" Grenzen enthält. Sie können diese Eigenschaft deaktivieren, um moderne Dialogthemen zu erstellen.
DialogPosition: TDamDlgPosition = Definiert die Startposition des Dialogformulars:
HandleExceptions: Boolean = definiert dieses TDAM, um alle Anwendungsausnahmen zu verarbeiten, und zeigt die Fehlermeldung mit demselben Dialog wie alle anderen DAM -Nachrichten an. Es kann nur ein TDAM so eingestellt werden, dass es Ausnahmen in der Anwendung verarbeiten kann.
HideIcon: Boolean = Wenn wahr, wird das Symbol im Meldungsdialog unterdrückt.
Images: TCustomImageList = Ermöglicht Ihnen, einen Imagelisten mit Tag <img:idx> im Nachrichtentext festzulegen, wobei idx Bildindex ist.
Language: TDamLanguage = Definiert die Sprache, die von Meldungschaltflächen und Meldungsformiten verwendet wird. Wenn Sie eine Instanz von TDAM -Komponente platzieren, wird diese Eigenschaft gemäß der system aktuellen Sprache initialisiert. Wenn nach dem System keine Sprache verfügbar ist, wird die englische Sprache festgelegt. Diese Eigenschaft hat keinen Standardwert, genau weil sie die definierte Sprache speichern sollte.
MessageColor: TColor = Hintergrundfarbe des Nachrichtenbereichs im Meldungsdialog definieren.
MessageFont: TFont = definiert die Textschrift der Nachrichten
MessageFontColor: TAlphaColor = Definiert die Texte -Schriftfarbe von Nachrichten (nur in der FMX -Umgebung verfügbar)
PlaySounds: Boolean = System -Sounds aktivieren, wenn Sie Warn-, Fragen- und Fehlermeldungen anzeigen.
OnLinkClick(Sender: TObject; Msg: TDamMsg; const Target: string; var Handled: Boolean; var CloseMsg: Boolean; var MsgResult: TDamMsgRes)
Standardmäßig wird das Link -Ziel automatisch mit Shellexecute von Windows API geöffnet. Wenn das Ziel also ein Weblink ist, öffnet der Standardbrowser den Link, oder wenn das Ziel eine Systemdatei ist, wird der Pfad von Windows ausgeführt/geöffnet.
Wenn Sie dieses Verhalten umgehen möchten, verwenden Sie dieses Ereignis und setzen Sie sich auf True Handled . Sie können CloseMsg auch auf das echte und MsgResult -Flag einstellen, wenn Sie das Nachrichtenfenster schließen möchten.
OnShowMessage(Sender: TObject; Msg: TDamMsg; var MsgText: String; var Handled: Boolean; var MsgResult: TDamMsgRes)
Warnung! Wenn Sie eine Ausnahmemeldung umgehen, erhöht die Komponente keine Ausnahme und setzt die Codeausführung fort (es sei denn, Sie erstellen Ihre eigene Ausnahme bei Ereignisverfahren).
Button1: String = Bildunterschrift der Schaltfläche 1 im Meldungsdialog. Verfügbar, wenn Schaltflächen = dBone/DBTWO/DBTHREEe.
Button2: String = Bildunterschrift der Schaltfläche 2 im Meldungsdialog. Verfügbar, wenn Buttons = DBTWO/DBTHREE.
Button3: String = Bildunterschrift der Schaltfläche 3 im Meldungsdialog. Verfügbar, wenn Schaltflächen = dBTHREE.
Buttons: TDamMsgButtons = definiert die Schaltflächen im Meldungsdialog:
CustomIcon: TIcon = Definiert ein benutzerdefiniertes Symbol, das im Meldungsdialog angezeigt wird. Dieses Symbol wird nur angezeigt, wenn icon = dicustom.
CustomTitle: String = Definiert einen benutzerdefinierten Titel für Nachrichtenformular. Diese Bildunterschrift wird nur verwendet, dann title = dtcustom.
Dam: TDam = Definiert den Damm Container dieser Nachricht.
FixedWidth: Integer = Definiert eine feste Breite des Textteils im Nachrichtenfenster in Pixel. Wenn dieser Wert Null ist (Standard), wird die Fensterbreite automatisch gemäß dem Nachrichtentext berechnet. Das Nachrichtenformular enthält eine minimale und maximale feste Grenzwerte (minimal = 300px / maximal = 75% der Bildschirmbreite - wenn Android oder iOS, maximal = 95% der Bildschirmbreite) .
HelpContext: THelpContext = definiert den Hilfskontext. Wenn diese Eigenschaft definiert ist, wird beim Meldungsdialog eine Hilfeschaltfläche angezeigt und die Anwendungshilfe zum Kontextziel geöffnet. Es ist auch möglich, den F1 -Schlüssel zu verwenden.
HelpKeyword: String = Definiert Hilfe von Hilfsschlüsselwort. Wenn diese Eigenschaft definiert ist, wird beim Meldungsdialog eine Hilfeschaltfläche angezeigt und die Anwendungshilfe für das Keyword -Ziel geöffnet. Es ist auch möglich, den F1 -Schlüssel zu verwenden.
Icon: TDamMsgIcon = Definiert das Symbol im Meldungsdialog:
Message: String = Der Nachrichtentext. Bitte verwenden Sie den Message Assistent Creator für die Textformatierung oder lesen Sie die HTLabel -Dokumentation. Die austauschbaren Parameter werden durch %p bei Meldungstext definiert. Verwenden Sie die Parameter in Array in der Nachrichtenmethode in derselben Reihenfolge wie im Nachrichtentext angegeben. Sie können auch die buchstäbliche {except} angeben, um die aktuelle Ausnahmemeldung zu erfassen und diese Variable im Nachrichtentext zu ersetzen (bitte siehe Ausnahmebeispiele).
Name: String = Message -Objektname. Wenn der Name dann mit _ Zeichen beginnt, bedeutet die Nachricht versteckt, sodass der Delphi nicht glaubt, dass Sie dieses Objekt aufrufen, wenn Sie die Nachrichtenmethode mit demselben Namen aufrufen.
RaiseExcept: Boolean = diese Nachricht als Erhöhungsnachricht festlegen. Wenn Sie diese Nachricht nennen, wird eine Ausnahme mit dem Nachrichtentext angehoben. In diesem Fall müssen Sie mindestens ein TDAM mit HandleExceptions = true verwenden, da die Nachricht nicht mit einer Dammanpassung formatiert wird.
SwapFocus: Boolean = standardmäßig beginnt die erste Taste auf der linken Seite mit dem Fokus. Wenn Sie diese Option aktivieren, startet diese Meldung den Fokus bei der letzten Schaltfläche (die Schaltfläche rechts).
Title: TDamMsgTitle = Definiert den Titel des Nachrichtenformulars
Alle Nachrichtenparameter werden von Komponenten automatisch "entkommen".
Beispiele:
procedure Test1 ;
begin
MyCustomMessage([ ' This will display <b> literal string ' , ' This will display "%p" literal string ' ]);
end ;
procedure Test2 ;
begin
MsgInfo( ' <b>First message parameter</b>: %p ' , [ ' Here I want to display literal <> characters ' ]);
end ;%p und {except} ).Wenn Sie HTML -Literalzeichen im festen Nachrichtenteil anzeigen möchten, überprüfen Sie die Fluchtkonstanten in der DZHTMLTEXT -Dokumentation.
procedure MsgInfo ( const Msg: String; const Params: TDamParams = nil ); // message with Information icon
procedure MsgWarn ( const Msg: String; const Params: TDamParams = nil ); // message with Warning icon
procedure MsgError ( const Msg: String; const Params: TDamParams = nil ); // message with Error icon
function MsgQuest ( const Msg: String; const Params: TDamParams = nil ): Boolean; // message with Question mark icon
procedure MsgRaise ( const Msg: String; const Params: TDamParams = nil ); // message with Error icon (this raises an exception)
procedure ShowErrorMsg ; // show current error message
function CaptureErrorMsg : String; // get current error message Diese Methoden sind weltweit, bei Einheit DamUnit oder bei Einheitennamen, die Sie in der Damunitname -Immobilie angegeben haben, erhältlich.
Sie können schnelle Nachrichten direkt im Code anzeigen und einfach die von Ihnen gefallenen Nachrichten und Parameter eingeben.
Diese Methoden verwenden den TDAM -Container, der als Standard definiert ist. Sie müssen also ein TDAM mit
DamDefault-Eigenschaft zur Verfügung stehen lassen.
Die Funktion MsgQuest ERGEBNISSE TRUE, wenn die Taste der Ja gedrückt wurde, oder false zurückgegeben, wenn keine Taste gedrückt wurde.
Die Methode ShowErrorMsg zeigt die derzeitige Ausnahme. Sie können dies als Versuch verwenden.
Mit dem Funktion CaptureErrorMsg können Sie die Fehlermeldung für die aktuelle Ausnahme abrufen. Sie sollten dies beim Versuch verwenden.
Exception Catch -Beispiel:
try
DoSomeStuff;
except
ShowErrorMessage; // will show error message dialog using Dam concept
end ; try
DoSaveFile;
except
MsgError( ' Fatal error saving file: %p ' , [CaptureErrorMsg]);
end ; Wenn Sie im Nachrichtentext buchstäblich {except} angeben, wird dies durch die aktuelle Fehlermeldung ersetzt:
try
DoSaveFile;
except
MsgError( ' Fatal error saving file: {except} ' ); // don't need to use CaptureErrorMsg function!
end ;Sie können auch eine Ausnahme wieder aufnehmen:
try
DoSaveFile;
except
raise EDam.Create( ' Fatal error saving file: {except} ' ); // re-raise a new exception with better text message
end ; Sie können den Parameter RaiseExcept auf einem Damm -Nachrichtenobjekt einstellen. Wenn die Nachricht aufgerufen wird, wird eine Ausnahme erhöht.
Denken Sie daran: Um die DAM -Ressourcen zu nutzen, müssen Sie HandleExceptions für DAM -Containerobjekte festlegen. Wenn eine Ausnahme erhöht wird, fängt DAM diese Ausnahme ab und zeigt benutzerdefinierte Dialogin an.
Beispiele:
procedure TestException_Generic ;
begin
raise Exception.Create( ' This is my generic exception ' );
// HTML tags are NOT allowed when using generic exception
end ;
procedure TestException_DamRunTimeCreation ;
begin
raise EDam.Create( ' This is my <b>exception</b> with parameter %p ' , [ ' First parameter ' ]);
end ;
procedure TestException_DamDesignTimeCreation ;
begin
raise EDam.Create(MyCustomMessage, [ ' First parameter ' ]);
// MyCustomMessage represents a TDamMsg object created at design-time
end ;
procedure TestException_DamDesignTimeCreation_ByProperty ;
begin
_MyCustomMessage.Run([ ' First parameter ' ]);
// or
MyCustomMessage([ ' First parameter ' ]);
// MyCustomMessage represents a TDamMsg object created at design-time with property RaiseExcept=True
end ;
procedure TestException_Quick ;
begin
MsgRaise( ' This is my <b>exception</b> with parameter %p ' , [ ' First parameter ' ]);
// This method is for compatibility, but I recommend you to use "raise EDam.Create" instead.
end ;Es gibt eine Datei namens Damlang.ini (Ressourcenordner), in der alle Zeichenfolgen für die Komponente verwendet werden. Wenn Sie einen Text in dieser Datei ändern möchten, müssen Sie anschließend " Dam Resource bat bat " ausführen. Mit dieser Stapel erstellt eine neue Datei " Dam_Resource.res " im Stammkomponentenordner.
Danach führen Sie bitte die " Afterbuild.bat " aus, um diese neue Ressourcendatei im Ordner "lib" zu veröffentlichen.
Wenn Sie eine neue Sprache hinzufügen möchten, sind einige Änderungen im Code erforderlich. Öffnen Sie also bitte ein neues Problem und veröffentlichen Sie die gewünschten Sprachzeichenfolgen, dann werde ich mich in der Komponente bewerben.
Wenn Sie Delphi -Versionen unter XE8 verwenden, können Sie in allen DAM -Methoden, die den Parameter von Tdamparams enthält, nicht direkt dynamisches Array -Parameter übergeben.
Verwenden Sie in solchen Fällen die globalen DamParams . Diese Funktion ist auch bei der automatischen Einheit von DAM erhältlich.
Hier finden Sie einige Beispiele für die Verwendung der DAM -Nachrichtenmethode in diesen Versionen:
// Quick message:
MsgInfo( ' This is a test message with parameter value = %p ' , DamParams([ 999 ]));
// Custom message:
MyCustomMessage(DamParams([ ' Parameter 1 ' , ' Parameter 2 ' ]));Das Design dieser Komponente kam um 2005, als ich überprüft habe, ob ich standardisierte Dialogfelder für meine Anwendungen erstellen muss.
Zu dieser Zeit nannte ich die Komponente des "besseren Dialogfelds", das auf Portugiesisch DM ( Diálogo Melhor ) wäre.
Nach einer Weile enthielt das Projekt eine neue Struktur mit dem Behälter. Dann habe ich die Komponente in "noch besseres Dialog" umbenannt, was auf Portugiesisch Damm ist ( Diálogo Ainda Melhor ). ?
Der Name der Komponente blieb also als Damm.
Heute verwende ich diese Komponente in fast allen meinen Delphi -Anwendungen.