Søg
Avatar billede nexon Nybegynder
20. maj 2008 - 14:52 Der er 18 kommentarer

Kode fejl ?

Nogle dom ved hvad der er galt med denne kode ?

begin
if Memo1.Lines.SaveToFile('C:\Users\****\Desktop\1231231\Test.txt') then
ShowMessage('Filen er gemt!');
else
ShowMessage('Filen er ikke gemt, prøv igen senere.');
end;

Den skulle gerne komme med en beksed når teksten ikke bliver gemt, af en eller anden grund. Men kan ik helt se hvad der er galt ? :)
Avatar billede w13 Novice
20. maj 2008 - 14:54 #1
Du kan jo køre debugning og se, hvad den så gør. :)
Avatar billede arne_v Ekspert
20. maj 2008 - 15:10 #2
semikolon foran else ser forkert ud
Avatar billede nexon Nybegynder
20. maj 2008 - 15:22 #3
Kan i evt. komme med en kode som virker? :)
Avatar billede vallemanden Nybegynder
20. maj 2008 - 15:22 #4
ja tror også arne har ret
ShowMessage('Filen er gemt!');
skal være
ShowMessage('Filen er gemt!')
altså unden ;
Avatar billede nexon Nybegynder
20. maj 2008 - 15:27 #5
Den skiver:

"Type of expression must be BOOLEAN"
og
"Expected but ';' found"

Det er i denne linie den viser rødt:
if Memo1.Lines.SaveToFile('C:\Users\****\Desktop\1231231\Test.txt') then

De samme fejl som den viste ved min kode
Avatar billede nexon Nybegynder
20. maj 2008 - 15:30 #6
begin
if Memo1.Lines.SaveToFile('C:\Users\****\Desktop\1231231\Test.txt') then
ShowMessage('Filen er gemt!')
else
ShowMessage('Filen er ikke gemt')
end;

Den viser den samme fejl ved denne :S
Avatar billede vallemanden Nybegynder
20. maj 2008 - 15:39 #7
nåå

ja du kan ikke sætte en if sætning rundt om den, men hvorfor skulle den ikke gemme?

brug en try..except
Avatar billede vallemanden Nybegynder
20. maj 2008 - 15:40 #8
try
Memo1.Lines.SaveToFile(''C:\Users\****\Desktop\1231231\Test.txt'');
except
showmessage('filen er IKKE gemt');
end;
Avatar billede vallemanden Nybegynder
20. maj 2008 - 15:41 #9
hov

try
Memo1.Lines.SaveToFile('C:\Users\****\Desktop\1231231\Test.txt');
except
showmessage('filen er IKKE gemt');
end;
Avatar billede nexon Nybegynder
20. maj 2008 - 15:43 #10
Alså

begin
try
Memo1.Lines.SaveToFile('C:\Users\****\Desktop\1231231\Test.txt');
except
showmessage('filen er IKKE gemt');
end;
Avatar billede vallemanden Nybegynder
20. maj 2008 - 15:50 #11
F.eks.....

procedure TForm1.Button1Click(Sender: TObject);
begin
  try
  Memo1.Lines.SaveToFile('C:\Users\****\Desktop\1231231\Test.txt');
  except
  showmessage('filen er IKKE gemt');
  end;
end;
Avatar billede nexon Nybegynder
20. maj 2008 - 15:51 #12
Uff nu virker det. !!! Mange tussende tak :)
Avatar billede nexon Nybegynder
20. maj 2008 - 15:55 #13
Ved du så os hvad koden er vis det samme sker på en FTP server ? :)
Avatar billede vallemanden Nybegynder
20. maj 2008 - 16:00 #14
muligvis
Avatar billede vallemanden Nybegynder
20. maj 2008 - 16:01 #15
jeg kigger på dit andet spg senere
Avatar billede nexon Nybegynder
20. maj 2008 - 16:04 #16
mange tak :)
Avatar billede vallemanden Nybegynder
22. maj 2008 - 02:55 #17
acepter mine svar
Avatar billede vallemanden Nybegynder
30. maj 2008 - 13:08 #18
acepter mine svar, så dette spg kan blive lukket !!!!!
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
udstyr til udespa Af Hightech i Andet programmering 2 29/04/202609:42 30/04/202622:16
Bat file. Af johnnylassen i Andet programmering 4 23/04/202616:10 24/04/202609:43
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 02/12/202520:42
Hjælp til programmering af website Af hamdenlange i Andet programmering 16 17/08/202522:26 19/08/202515:53
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
03/0500:59 Mobilepay app virker ikke mere på Xiaomi Redmi Note 13 Pro Af henrixx i Apps til Android
02/0519:09 Download Win 11 - 25H2 Af ErikHg i Windows
30/0410:42 Access Import af csv fil - forkerte datatyper Af Henrik Berg Hansen i Andet software
29/0419:37 Hente CSV fil, indsætte CSV data i TABEL for JAVASCRIPT Af snestrup2000 i Programmeringsværktøjer
29/0412:23 Facebook Af hkv i Sociale medier
White papers
Flere white papers »