http://sourceforge.net/projects/embeddedwb/
if the site is still down you can download here
http://www.torry.net/vcl/internet/browsers/EmbeddedWBD5XE14.70.0.zip
Aaron
to add a field to a dbgrid at runtime
DBGrid1.Columns.Add;
DBGrid1.Columns[0].FieldName:='Id';
DBGrid1.Columns.Add;
DBGrid1.Columns[1].FieldName:='Student Names';
DBGrid1.Columns.Add;
DBGrid1.Columns[2].FieldName:='English';
DBGrid1.Columns.Add;
DBGrid1.Columns[3].FieldName:='Math';
etc..
Aaron
there’s a few ways all of which are easily found using Google.
procedure TForm1.Button1Click(Sender: TObject);
var
TitleName : string;
lpItemID : PItemIDList;
BrowseInfo : TBrowseInfo;
DisplayName : array[0..MAX_PATH] of char;
TempPath : array[0..MAX_PATH] of char;
begin...
found this on torry
...compare two images pixel by pixel?
procedure TForm1.Button1Click(Sender: TObject);
var
b1, b2: TBitmap;
c1, c2: PByte;
x, y, i,
different: Integer; // Counter for different pixels
begin
b1 := Image1.Picture.Bitmap;
b2 := Image2.Picture.Bitmap...
this is from memory, should be correct.
Label1.Text := IntToStr(Table1.FieldByName('30d').AsInteger + Table1.FieldByName('60d').AsInteger + Table1.FieldByName('90d').AsInteger + Table1.FieldByName('120d').AsInteger);
Aaron
first question is how are you interfacing the door lock to the pc. usb, rs232 ???
it can be as simple as toggling the dtr line on the rs232 port to trigger a relay.
Aaron
your processing the string list twice
Here *** StringListContainsRuntime(StrList);
And
Here *** if StringListContainsRuntime(StrList)=false then begin
remove the first one.
why even have the function unless you intend to pass lots of string lists.
[code]
procedure...
dont know if you already knew this
having the function that way isnt realy being a function
it should be...
function StringListContainsString(StrList:TStringList;SearchString:String):Boolean;
begin
Result := AnsiContainsText(StrList.Text, SearchString);
end;
procedure...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.