[FORMS] alerte box [Résolu]

[chand_bing]

Bonjour,

J'utilise Developper 2000 et plus precisement FORMS.

LE souci c'est que je ne me rappel plus comment on creer une fenetre d'alerte

Enfin j'ai creer un objet alert...j'appel la procedure message dans mon trigger ( le message d'erreur apparait en bas de la fenetre principàal)..mais je ne sais pas comment fait apparaitre mon message dans un popus fenetre d'alerte.
j'espere que j'ai ete clair

Merci de me venir de nouveau en aide

[SheikYerbouti]

Il faut créer une ou plusieurs Alerts dans votre form et y faire appel avec les built-in Set_Alert_Property() et Show_alert()

[chand_bing]

merci beaucoup

[sourizeante]

Un petit conseil : si tu veux eviter de multiplier les objets et que tu veux facilement modifier les messages d'alerte essaye de developper une petite procedure dans une librairie PLL pour ca .

1) Creer une table des messages d'alerte, avec un ID et un libelle.
2) Creer une alerte standard
3) Creer la procedure qui la gere.

Ca donne a peu pres ça :

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
FUNCTION custom_alert
(msgno 	IN varchar2) 
RETURN number
IS
  msg_string   varchar2(200);
  msg_title		 varchar2(32);
  alert_is     alert;
  alert_bouton number;
	mypos pls_integer;
 
BEGIN
      begin
	SELECT libelle INTO msg_string
	FROM ma table_d_alertes WHERE ID = msgno;
      exception
	  when others then
			msg_string := msgno;
      end;
 
  alert_is := find_alert('NOM_DE_MON_OBJET_ALERT');
  msg_title := 'ATTENTION : ';   
 
 
IF (NOT id_null(alert_is)) 
then 
    set_alert_property(alert_is, TITLE, msg_title);
    set_alert_property(alert_is, ALERT_MESSAGE_TEXT, msg_string );  
    alert_bouton := show_alert(alert_is);  
else
    message(msg_string);
end IF;
 
  RETURN(alert_bouton);
END;

Tu peux bien sur rajouter des parametres, utiliser une notion de type d'alerte avec des objets differents en fonction du type (qui devient alors une colonne de plus dans ta table des alertes).

Bon courage.