To LUGNET HomepageTo LUGNET News HomepageTo LUGNET Guide Homepage
 Help on Searching
 
Post new message to lugnet.cad.devOpen lugnet.cad.dev in your NNTP NewsreaderTo LUGNET News Traffic PageSign In (Members)
 CAD / Development / 7876
7875  |  7877
Subject: 
Re: Need help on delphi?
Newsgroups: 
lugnet.cad.dev
Date: 
Fri, 20 Sep 2002 22:40:49 GMT
Viewed: 
669 times
  
Well I fix it myself but I how but is fixed Thanks all
soon I'll show you all the cool editor powered by ldglite.

In lugnet.cad.dev, Eduardo Vazquez Harte writes:
Hello to all,
Thanks to all for helping me before
still need help I made this thing to sum position and add pluss -20 LDU
but I can make it work 100% something is wrong can someone check it and
tell me how to fix it?

XXXXXX DELPHI CODE XXXXXX

begin
Memo2.Clear;
itemtotext; // custom procedure is 100% ok error is not in it
// IntToStr( StrToInt(Edit1.Text) + 20) )
A:= StrToInt(Memo2.Lines.Strings[3]);
//  Edit1.Text:=IntToStr( StrToInt(Edit1.Text) + -20);
B:=+ -20;
C:={//inttostr(b);}  IntToStr( A + B );
All:=(Memo2.Lines.Strings[0] + ' ' + Memo2.Lines.Strings[1] +
      ' ' + Memo2.Lines.Strings[2] + ' ' + Memo2.Lines.Strings[4] +
      ' ' + C + ' ' + Memo2.Lines.Strings[5] +
      ' ' + Memo2.Lines.Strings[6] + ' ' + Memo2.Lines.Strings[7] +
      ' ' + Memo2.Lines.Strings[8] + ' ' + Memo2.Lines.Strings[9] +
      ' ' + Memo2.Lines.Strings[10] + ' ' + Memo2.Lines.Strings[11] +
      ' ' + Memo2.Lines.Strings[12] + ' ' + Memo2.Lines.Strings[13] +
      ' ' + Memo2.Lines.Strings[14] );
listbox1.Items.Strings[Form1.ListBox1.ItemIndex]:=All;

XXXXXX END OF CODE XXXXXX



Message is in Reply To:
  Need help on delphi?
 
Hello to all, Thanks to all for helping me before still need help I made this thing to sum position and add pluss -20 LDU but I can make it work 100% something is wrong can someone check it and tell me how to fix it? XXXXXX DELPHI CODE XXXXXX begin (...) (22 years ago, 20-Sep-02, to lugnet.cad.dev)

2 Messages in This Thread:

Entire Thread on One Page:
Nested:  All | Brief | Compact | Dots
Linear:  All | Brief | Compact
    

Custom Search

©2005 LUGNET. All rights reserved. - hosted by steinbruch.info GbR