SaveDialog i wybór odpowiedniego filtru

0

Witam, mam ustawione następujące filtry na save dialog:
SaveDialog1.Filter:='Plik tekstowy(.txt)|.txt|Dokument HTML(.html)|.html|Wszystkie pliki(.)|.';
SaveDialog1.DefaultExt:='Plik tekstowy(
.txt)|.txt|Dokument HTML(.html)|.html|Wszystkie pliki(.)|.';

Chce zrobić tak,aby po wyborze np Pliku tekstowego (w oknie save dialog) otrzymac komunikat po kliknięciu w Zapisz że np:Wybrano TXT

zrobilem cos takiego:

if SaveDialog1.Execute then
zapistxt:=SaveDialog1.FileName+'.txt';
if zapistxt=(SaveDialog1.FileName+'.txt') then
begin
Application.MessageBox('Wybrales TXT','Informacja',MB_ICONINFORMATION or MB_OK);
end;
Memo2.Lines.SaveToFile(SaveDialog1.FileName);

ale komunikat ten wyskakuje przy wyborze dokumentu txt i html, a chce by sie wyswietlal tylko przy wybraniu filtra na txt.

0
adiek napisał(a)

zapistxt:=SaveDialog1.FileName+'.txt';
if zapistxt=(SaveDialog1.FileName+'.txt') then

cudowne [glowa]

a może tak :

if SaveDialog1.Execute then
  begin
  if SaveDIalog1.FilterIndex = 1 then
    Application.MessageBox('Wybrales TXT','Informacja',MB_ICONINFORMATION or MB_OK);
  end;

;)

0

wiem, wiem tam był ewidenty błąd :| :|
wlasnie mi chodzilo o filter indeks by sie odwolac do wartosci:) teraz dziala. DZIEKI [browar]

1 użytkowników online, w tym zalogowanych: 0, gości: 1