Søg
Avatar billede cool-wil Nybegynder
04. december 2001 - 22:35 Der er 19 kommentarer og
1 løsning

3 i 1

Heysa.
Jeg sidder for tiden og koder en text editor/html editor.
Jeg har lidt problemer med funktionen finddialog.
når jeg har smidt den på min form1, hvad skal jeg så skrive i koden så den kan søge i en tekst?

Spm 2: jeg har siddet lidt og tænkt på hvordan man laver en help fil, ligesom dem man ser i windows programmer osv, mener deres endelse er .hlp filer.

Jeg vil gerne have en hjælpe fil direkte i programmet, så man kan læse lidt om hvordan det virker, hvordan gør jeg det nemmest?

Spm 3 handler om install..
Jeg vil gerne have en windows installer til at smidde mit program ind i start menuen på brugerens puter + lave en genvej på skrivebordet, hvordan gør jeg dette?

Nu når man gemmer en fil i mit program, og man så trykker på den direkte, går filen ind i notepad.exe(windows, hvordan kan jeg lave det om, så brugeren får mit program i stedet?

Det var vist det, nogle der vil hjælpe mig lidt her?

wil/
Avatar billede cool-wil Nybegynder
04. december 2001 - 22:36 #1
lidt mere til 1:
Jeg har lavet et menu punkt der hedder search, det er den man skal trykke på for at søge på siden, hvordan?
Avatar billede dkn Nybegynder
04. december 2001 - 22:41 #2
I dette eksempel ska du bruge:
1. TRichEdit
1. TButton
1. TFindDialog.


procedure TForm1.Button1Click(Sender: TObject);
begin
FindDialog1.Position := Point(RichEdit1.Left + RichEdit1.Width, RichEdit1.Top);
FindDialog1.Execute;
end;

procedure TForm1.FindDialog1Find(Sender: TObject);
var
FoundAt: LongInt;
StartPos, ToEnd: Integer;
begin
with RichEdit1 do
begin
  if SelLength <> 0 then
    StartPos := SelStart + SelLength;
  else
    StartPos := 0;
  ToEnd := Length(Text) - StartPos;
  FoundAt := FindText(FindDialog1.FindText, StartPos, ToEnd, [stMatchCase]);
  if FoundAt <> -1 then
  begin
    SetFocus;
    SelStart := FoundAt;
    SelLength := Length(FindDialog1.FindText);
  end;
end;
end;


Håber sku det hjalp lidt :)

dkn
Avatar billede cool-wil Nybegynder
04. december 2001 - 23:37 #3
1. TRichEdit
hvor befinder den her sig?
Avatar billede cool-wil Nybegynder
04. december 2001 - 23:39 #4
har fundet den:-)
Avatar billede cool-wil Nybegynder
04. december 2001 - 23:40 #5
for helvede kom til at acceptere:-(
Avatar billede dkn Nybegynder
04. december 2001 - 23:48 #6
Ahh jeg svarer bare på de andre imorgen :)

dkn
Avatar billede cool-wil Nybegynder
04. december 2001 - 23:53 #7
dkn> gidder du ikke lave en sourcecode og sende den til mig på wil@talkzone.dk

kan ikke få det lort til at virke, den skriver alt muligt underligt, når jeg vil compile lortet:-(

please

kan ikke komme vidre før jeg får den til at virke
Avatar billede darkside Nybegynder
05. december 2001 - 05:53 #8
Der er et ; for meget i dkn\'s kode...den skal se sådan her ud..
procedure TForm1.FindDialog1Find(Sender: TObject);
var
FoundAt: LongInt;
StartPos, ToEnd: Integer;
begin
with RichEdit1 do
begin
  if SelLength <> 0 then
    StartPos := SelStart + SelLength
  else
    StartPos := 0;
  ToEnd := Length(Text) - StartPos;
  FoundAt := FindText(FindDialog1.FindText, StartPos, ToEnd, [stMatchCase]);
  if FoundAt <> -1 then
  begin
    SetFocus;
    SelStart := FoundAt;
    SelLength := Length(FindDialog1.FindText);
  end;
end;
end;
Avatar billede cool-wil Nybegynder
05. december 2001 - 15:32 #9
ingen af disse forslag virker, den melder fejl når jeg compiler

kan en af jer ikke sende mig en sourcecode med det hele til wil@talkzone.dk
Avatar billede darkside Nybegynder
05. december 2001 - 15:34 #10
klart 2 sec, laver lige en.
Avatar billede darkside Nybegynder
05. december 2001 - 15:40 #11
sendt.
Avatar billede cool-wil Nybegynder
05. december 2001 - 15:51 #12
mange tak darkside,..det virkede, ved virkligt ikke hvad der gik galt for mig, jeg kunne ikke få den helt samme kode til at spille:-(

Har du et forslag til hvordan jeg laver en hjælpe fil?

Avatar billede darkside Nybegynder
05. december 2001 - 15:54 #13
Ja der findes flere programmer på nettet der kan lave hjælpe filer, skal lige se om jeg kan finde nogen links
Avatar billede darkside Nybegynder
05. december 2001 - 15:55 #14
Der er lidt her, ved ikke om der er noget brugbart..
http://download.cnet.com/downloads/1,10150,0-10001-103-0-1-7,00.html?tag=srch&qt=Help+Files&cn=&ca=10001
Avatar billede cool-wil Nybegynder
05. december 2001 - 16:05 #15
dark: problemet med den kode du har sendt mig, er ar jeg bruger tmainmenu til mine menu punkter og en tmemo1 som det vindue man skriver i

I det eksempel bruger man richedit i stedet, hvordan laver jeg det om så jeg kan bruge det i mit program
Avatar billede cool-wil Nybegynder
05. december 2001 - 16:06 #16
men tak for overstående link
Avatar billede darkside Nybegynder
05. december 2001 - 16:10 #17
Hvorfor bruger du ikke en Richedit istedet?
Avatar billede cool-wil Nybegynder
05. december 2001 - 16:12 #18
lige nu ser en tmemo bedre ud, det er den jeg bruger normalt til at skrive i, har ikke prøvet richedit endnu, kigger lige på det
Avatar billede cool-wil Nybegynder
05. december 2001 - 16:36 #19
har lige redigeret 2 km kode, hvor der stod memo1 i stedet for richedit1, men nu bruger jeg richedit:-)

wil/

ser lige om det virker nu så
Avatar billede cool-wil Nybegynder
05. december 2001 - 16:50 #20
Lad os sige det sådan, jeg skal ikke bruge richedit1, det fucker mit program helt vildt meget up, det dur ikke mere:-(

Så i dette tilfælde skal jeg bruge en kode der er baseret på tmemo og ikke richedit..
kan i hjælpe?
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Programmeringssprog kurser
Kurser inden for grundlæggende programmering
Se alle Programmeringssprog kurser

Flere spørgsmål fra Andet programmering kategorien

Titel Indlæg Oprettet Seneste aktivitet
Bat file. Af johnnylassen i Andet programmering 4 23/04/202616:10 21/08/202611:03
Hjælp til Api.asmx Af lurup i Andet programmering 1 17/03/202609:27 17/03/202614:12
burgermenu til hjemmeside - hjælp! Af SabrinaL i Andet programmering 2 12/11/202514:10 21/08/202611:08
Hjælp til programmering af website Af hamdenlange i Andet programmering 16 17/08/202522:26 19/08/202515:53
Kan man registrere hvis folk lukker en side ned Af KurtG i Andet programmering 8 24/07/202513:06 28/07/202517:03
Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Opret Log ind

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
09/1108:35 D3D12 lukker nogle spil ned Af thedukedk i Andet software
08/1115:48 søger pris på en bærbar Af dcedata1977 i PC
06/1119:03 iMac 2026 M6 10-core GPU (standart ell opdatering) Af LLG i Mac
06/1109:43 Vista Af susej14 i Andet software
05/1111:47 Printernavn i Enhedshåndtering er et andet end i Printere og Scannere Af Uvanga i Printere
White papers
Flere white papers »