Besked

Tags:    delphi

Hej...
Jeg har to spørgsmål..Det her er den ene:
I min Tekst program skal den spørge om dokumentet skal gemmes eller ej...Hvordan gøre man det??
Og det her er den anden:
jeg har lavet en Finddialog og en knap...Som skal finde et ord ...men jeg kender ikke koden til at den skal finde ordet man søge efter..

Håber der er nogen der kan besare nogen af spørgsmålene!

Hilsen Armen



4 svar postet i denne tråd vises herunder
0 indlæg har modtaget i alt 0 karma
Sorter efter stemmer Sorter efter dato
Hej...
Jeg har to spørgsmål..Det her er den ene:
I min Tekst program skal den spørge om dokumentet skal gemmes eller ej...Hvordan gøre man det??
Og det her er den anden:
jeg har lavet en Finddialog og en knap...Som skal finde et ord ...men jeg kender ikke koden til at den skal finde ordet man søge efter..

Håber der er nogen der kan besare nogen af spørgsmålene!

Hilsen Armen


Jeg tror dette kan hjælpe dig.
Den gør noget, hvis man har ændret i teksten, så kan du selv lige lege med det:

if RichEdit1.Modified then DoSomething // Kode for hvad den skal gøre, hvis man har ændret i teksten...
else
DoSomething; // Hvis ikke, skal den gøre ...?

// Martin.




I min Tekst program skal den spørge om dokumentet skal gemmes eller ej...Hvordan gøre man det??


Prøv med:

if MessageDlg('Gem dokumentet?', mtConfirmation, [mbOK,mbCancel], 0) = mrOk then
RichEdit1.SaveTofile('c:\\blabla.txt');



Dit andet spørgsmål har du vist fået svar på i en anden tråd...




Jeg tror dette kan hjælpe dig.
Den gør noget, hvis man har ændret i teksten, så kan du selv lige lege med det:

if RichEdit1.Modified then DoSomething // Kode for hvad den skal gøre, hvis man har ændret i teksten...
else
DoSomething; // Hvis ikke, skal den gøre ...?

// Martin.


Det hjælper ikke og virker ikke så kender du andre måder så jeg kan få det til at due




Har fundet selv ud af det..
<pre>
BEGIN
CASE MessageDlg('Skal dit dokument gemmes,'+#13#10+
'inden SiteCoder lukkes?',
mtConfirmation,mbYesNoCancel,0) OF
idYes: Gem1Click(Sender);
idNo: close;
idCancel: exit;
end;
end;
end;
</pre>



t