Solved

Fehlerhafter Beispiel Quellcode in Delphi 3.0 Standard

Posted on 1997-06-23
2
174 Views
Last Modified: 2011-09-20
Ich das Beispielprogramm von Delphi 3.0 Standard abgearbeitet. Doch beim Programmablauf escheint eine Fehlermeldung, d.h. drei Fehlermeldungen zwei davon habe ich selbst berichtigt
fehlende "1" bei DBGrid.Fields[i].AsString]));
und fehlende ")" bei SaveToFile(SaveDialog1.FileName;
Doch zur dritten Fehlermeldung über die nicht deklarierte "CRLF" Anweisung weiß ich keinen Rat und kann auch nichts in der Online Hilfe dazu finden.
Wie muß die Zeile denn richtig lauten ?
Original Quelltext ...
 procedure TForm1.BitBtn2Click(Sender: TObject);
var
 i: integer;
begin
 SaveDialog1.Title :=Format('Save info for %s', [DBText1.Field.AsString]);
 if SaveDialog1.Execute then
 begin
   with TStringList.Create do
   try
     Add(Format('Facts on the %s', [DBText1.Field.AsString]));
     Add(#13#10);
     for i := 1 to DBGrid1.FieldCount-3 do
       Add(Format('%s : %s',

         [DBGrid1.Fields[i].FieldName,
          DBGrid.Fields[i].AsString]));
     Add(Format(CRLF+'%s'+CRLF,[DBMemo1.Text]));
     SaveToFile(SaveDialog1.FileName;
   finally
     Free;
   end;
 end;
end;

Vielen Dank für Eure Bemühungen

Rüdiger Kutzik
0
Comment
Question by:ulli.rk
2 Comments
 

Accepted Solution

by:
shoffmeister earned 50 total points
ID: 1337657
Ersetze
[Replace]

var
  i: integer;

durch
[by]

var
  i: integer;
const
  CRLF = #13#10;

0
 

Author Comment

by:ulli.rk
ID: 1337658
Hello  Shoffmeister...,

Thank you for the prompte reply my question.
I`ll this Internet page at any rate farther recommend.

Rüdiger Kutzik
0

Featured Post

Free Tool: SSL Checker

Scans your site and returns information about your SSL implementation and certificate. Helpful for debugging and validating your SSL configuration.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Title # Comments Views Activity
Intraweb download file link ? 1 168
Twebbrowser in Fire monkey android scrolling to bottom 1 69
Delphi android app hide keyboard 3 47
Broadcast a message using ICS 2 28
A lot of questions regard threads in Delphi.   One of the more specific questions is how to show progress of the thread.   Updating a progressbar from inside a thread is a mistake. A solution to this would be to send a synchronized message to the…
This article explains how to create forms/units independent of other forms/units object names in a delphi project. Have you ever created a form for user input in a Delphi project and then had the need to have that same form in a other Delphi proj…
In a recent question (https://www.experts-exchange.com/questions/29004105/Run-AutoHotkey-script-directly-from-Notepad.html) here at Experts Exchange, a member asked how to run an AutoHotkey script (.AHK) directly from Notepad++ (aka NPP). This video…

730 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question